16-06-18, 11:24 PM
(16-06-18, 11:00 PM)ZaerAllail كتب :(16-06-18, 09:47 PM)dametucorazon كتب : تفضل اخي
حيث ان رقم 13 هو رقم زر انتركود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Convert.ToChar(13) Then
TextBox1.Text=""
TextBox2.Select()
End If
End Sub
بالتوفيق
المطلوب هو عدم مسح ما تم كتابته في التكست واحد وأنت وضعت أمر مسح لما تم كتابته !
وعموما بدون أمر المسح يتم مسح TextBox1 بمجرد الالإنتقال !
شكرا للجميع ولكن للأسف الشديد ولا كود منها حل المشكله !
بمجرد الضغط على إنتر ينتقل المؤشر للتكست الثاني ولكنه يمسح ما تم كتابته في التكست السابق
وكل عام وأنتم بخير !
اخي الفاضل الكود الذي وضعته لك ضعه في حدث TextBox1.KeyPress
ولن يتم مسح شي من التيكست بوكس الذي كتبت فيه فقط سينتقل لا تضع كود الحذف الذي كتيته لك فقط سيصبح الكود هكذا
كود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Convert.ToChar(13) Then
TextBox2.Select()
End If