03-03-15, 11:04 PM
السلام عليكم
الكود التالي للإنتقال من تيكست الى آخر
Private Sub textBox5_KeyPress(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.KeyPressEventArgs) Handles TextBox5.KeyPress
Dim KeyAscii As Short = Asc(eventArgs.KeyChar)
If KeyAscii = 13 Then
TextBox6.Focus()
End If
End Sub
لكن اذا كان المؤشر داخل كومبو بوكس وطبقنا الكود السابق يبقى المؤشر داخل الكومبو ولا ينتقل للتكست او الكومبو التالي
إلا عبر الضغط على زر Tab
ما الحل
شكرا
الكود التالي للإنتقال من تيكست الى آخر
Private Sub textBox5_KeyPress(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.KeyPressEventArgs) Handles TextBox5.KeyPress
Dim KeyAscii As Short = Asc(eventArgs.KeyChar)
If KeyAscii = 13 Then
TextBox6.Focus()
End If
End Sub
لكن اذا كان المؤشر داخل كومبو بوكس وطبقنا الكود السابق يبقى المؤشر داخل الكومبو ولا ينتقل للتكست او الكومبو التالي
إلا عبر الضغط على زر Tab
ما الحل
شكرا