Visual Basic 6.0 Proについて(2)

質問

コンニチワ
VBで
Private Sub ....
if a="1" then　ここにルーチンを抜ける記述
.
text1.text="1"
.
.
.
End Sub
(....は省略の意）
のように書いたとき
if a="1" thenの後に
このルーチンを抜けさせたいのですが
どうやったらいいのでしょうか？
また、VBにおけるサイズ表記を（オブジェクトなどの大きさなど）
をピクセルに変換するときはどのようにしたらよいのでしょうか?
詳しい方、わかる方よろしくお願いします

回答No.1

arata · ベストアンサー

ルーチンの脱出は

Exit Sub

です。Functionの場合は、

Exit Function

になります。

TwipsとPixelの変換は、Screen.TwipsPerPixelXやScreen.TwipsPerPixelYを使って計算します。プリンタでのサイズの場合は、Printer.TwipsPerPixcelXになります。

詳しくは、HELPをご覧ください。

回答No.3

arata

:(コロン)はいりませんよ。

If a="1" Then Exit Sub

でいいですよ。

回答No.2

eijyu

ども、最近VBは全然やってないのですが、曖昧な記憶でゴメンなさい。

if a="1" then : Exit sub

で良かったと思います。
end if は要らないです。

変換はやったことないのでわからないです。
何か関数あったかな～？
分かんなかった自分で書いちゃってもいいかも？
DLLとかに頼ってもいいかもね。