tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルEnterキー、Bsキー、等で、フォーカス移動は?
記事No637
投稿日: 2004/01/24(Sat) 17:57
投稿者タツヒコ
[OSのVer]:WindowsXp    [VBのVer]:VB.NET2003
VBの初心者です。初心者でありながらVB.Netのプログラミングは無理の承知の上で、挑戦してます
が、どうしてもわかりません。Enterキーや、Bsキー、あるいは→キーで、Kyepress時に、フォーカス
を次のテキストboxへ移動させたいのですが、VB4のように簡単にはいかないので、悩んでいます。
以前ですと、イベントプロシージャ(keypress)のPrivete_subに
Const Enterkey = 13
If Keycode = EnterKey Then
   Text1.setfocus
End if
のように記述すればよかったのですが、
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As      
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
  
End Sub
でしょう、KeyCodeもなんだか宣言する必要があるし、PrivateSubの引数の使い方も
System.Windows.Forms.KeyPressEventArgsの意味もさっぱりです。
このホームページの「イベントプロシージャ」の項目も、以前のVBのバージョンのようですね。
どなたかお助けください。よろしくお願い申し上げます。

[ツリー表示へ]
タイトルRe: Enterキー、Bsキー、等で、フォーカス移動は?
記事No638
投稿日: 2004/01/24(Sat) 21:47
投稿者花ちゃん
VB6.0でも色々方法があるので、.NETでも色々な方法があるかと思うのですが、
.NET を使っておりませんので未確認ですが、下記ではどうでしょう。

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) _
Handles TextBox1.KeyPress
  If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
    e.Handled = True
'   TextBox1.Enabled = False
'   TextBox1.Enabled = True  
    TextBox2.Focus()    
   End If
End Sub

[ツリー表示へ]
タイトルRe^2: Enterキー、Bsキー、等で、フォーカス移動は?
記事No639
投稿日: 2004/01/25(Sun) 01:03
投稿者タツヒコ
[OSのVer]:Windows    [VBのVer]:VB.NET  
お返事ありがとうございました。気になって眠れなかったのですが、
明日、コードを書くのが楽しみになりました。
今日はもう遅いので、とりあえず、お礼だけでもさせてください。
明日、試してみて、また、お返事させてください。
ありがとうございました。

[ツリー表示へ]