هل احد لديه معلومات عن Enter

بسم الله الرحمن الرحيم

افرض أسماء ال textFields t1,t2,t3

Private Sub t1_KeyPress(KeyAscii As Integer)

t2.SetFocus

End Sub



Private Sub t2_KeyPress(KeyAscii As Integer)

t3.SetFocus

End Sub



Private Sub t3_KeyPress(KeyAscii As Integer)

t1.SetFocus

End Sub

(f)

شكرا لك اخ hamohd70

هدا المطلوب

(gift)(gift)

شكرا لك اخosama nabeel

عل رد الرساله في شويه مشاكل بلا اجراء

(gift)(gift)

(f)