24-07-21, 08:07 AM
شكرا لك أخي الكريم تم المطلوب بحيث وضعت الكود في key_down كما اقترحت أنت وأضفت التالي
If TextBox86.Text.Length = 10 Then
GoTo x
ElseIf 2 <= TextBox86.Text.Length < 10 Then
'' ''Dim sp As New SoundPlayer("Wrong.wav")
'' ''sp.Play()
Timer10.Enabled = True
Exit Sub
End If
:x
وقد وضعت هذا الكود في البداية لكي يقوم بالإنتقال التلقائي بدون ضغط زر انتر
لك جزيل الشكر
دمت بود

