[ZaerAllail]

(16-06-18, 09:47 PM)dametucorazon كتب : تفضل اخي

كود :

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

حيث ان رقم 13 هو رقم زر انتر 
بالتوفيق

المطلوب هو عدم مسح ما تم كتابته في التكست واحد وأنت وضعت أمر مسح لما تم كتابته !
وعموما بدون أمر المسح يتم مسح TextBox1 بمجرد الالإنتقال !

---

شكرا للجميع ولكن للأسف الشديد ولا كود منها حل المشكله !

بمجرد الضغط على إنتر ينتقل المؤشر للتكست الثاني ولكنه يمسح ما تم كتابته في التكست السابق 


 وكل عام وأنتم بخير !

---

تم تصحيح الخطأ 
وللفائدة هذا هو الكود الصحيح  وشكرا للجميع بارك الله فيكم

كود :

       If Asc(e.KeyChar) = Keys.Enter Then
           e.Handled = True
           TextBox2.Focus()
       End If