リターンでコントロールを移動

質問

VB5の時は気にもしていなかったのですが、VB6だとリターンでコントロール(たとえばTEXT BOX)の移動ができません。

TABでは移動できるのですが、どこで設定するといいのでしょうか？

Windows2000Pro SP4
VB6 SP5 です。

よろしくお願いします。

回答No.1

123daa · ベストアンサー

if keyascii = 13 then
sendkeys "{tab}"
end

のことですか？
タブストップの値を設定して、キープレスでこれを入れれば動きます。

補足

こんにちは。ご回答ありがとうございます。

実はこれ、すでにやってみてはいたのですが、リターンを押した時点で、エラー音(ピン/ポン)がいちいち鳴るものでどうしたものかと思っていました。で、VB5を引っ張り出してきたところ何の設定もせずにリターンだけで次のオブジェクトにフォーカスが移っていたのでVB6にも何か設定があるのではないかと思った次第です。

XPProでも2000Proでも現象は同様です。

回答No.2

123daa

う～ん・・・

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then SendKeys "{TAB}"
End Sub

うちでは、これで問題なく動いているんですが・・
ぴこぴこいいますか～。
w2k pro に xp pro あと win9x と動いてます。
もちろん VB6 です。

お役に立てなくてごめんなさい。

お礼

こんにちは。

KeyAscii=0で、押さなかったことにした後に、移動するといいみたいです。

ありがとうございました。