Mit Return (Enter) zum nächsten Eingabefeld !

[Jan Kaiser]

Hallo,

ich habe eine Eingabedialog erstellt, jetzt möchte ich das man von einem Eingabefeld zum nächsten Eingabefeld springen kann.
Wie geht das am einfachsten mit VB2005 Express.

mfg Jan

[Gra Fri]

Hallo

Für die Textbox 'txtHaftPrämie'

&lt
' Mit ENTER in das nächste Eingabefeld
Private Sub txtSchaden_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtHaftPrämie.KeyDown

If e.KeyCode = Keys.Enter Then Windows.Forms.SendKeys.Send("{TAB}")
End Sub
&gt

mfg, GraFr

[Gra Fri]

Hallo

Für die Textbox 'txtHaftPrämie'

' Mit ENTER in das nächste Eingabefeld
Private Sub txtSchaden_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtHaftPrämie.KeyDown

If e.KeyCode = Keys.Enter Then Windows.Forms.SendKeys.Send("{TAB}")

End Sub

mfg, GraFr

[Andreas Kosch]

Hallo,

der Umweg über <b>SendKeys</b> ist nicht notwendig, da die Methode <b>ProcessTabKey</b> bereits im .NET Framework vordefiniert ist. Außerdem ist das Ereignis <b>KeyPress</b> besser geeignet, da kein Beep beim Drücken der ENTER-Taste ausgelöst wird:

<div style="font-family: Consolas; font-size: 10pt; color: black; background: white;"><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> TextBox1_KeyPress(<span style="color: blue;">ByVal</span> sender <span style="color: blue;">As</span> System.Object, _</p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp; <span style="color: blue;">ByVal</span> e <span style="color: blue;">As</span> System.Windows.Forms.KeyPressEventArgs) _</p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp; <span style="color: blue;">Handles</span> TextBox3.KeyPress, TextBox2.KeyPress, TextBox1.KeyPress</p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <span style="color: blue;">If</span> e.KeyChar = Microsoft.VisualBasic.ChrW(13) <span style="color: blue;">Then</span></p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; ProcessTabKey(<span style="color: blue;">True</span>)</p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; e.Handled = <span style="color: blue;">True</span></p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <span style="color: blue;">End</span> <span style="color: blue;">If</span></p><p style="margin: 0px;">&nbsp;&nbsp;&nbsp; <span style="color: blue;">End</span> <span style="color: blue;">Sub</span></p></div&gt