كيف لي ان اجعل text box لا يستوعب اكثر او اقل من14 رقم

السلام عليكم ورحمة الله

يوجد خاصية ضمن خصائص الصندوق النصي اسمها طول النص  Length ضع بها الطول الذي تريده 

او ممكن عن طريق الكود في حدث تغير النص للصندوق النصي TEXTBOX1_TextChanged

 وتكتب هذا الكود البسيط

if textbox1.text.length >= 14 then
sendkey.send ("{BACKSPACE}")
end if

ارجوا ان اكون افدتك

hisham saad كتب:

السلام عليكم ورحمة الله

 

يوجد خاصية ضمن خصائص الصندوق النصي اسمها طول النص  Length ضع بها الطول الذي تريده 

 

او ممكن عن طريق الكود في حدث تغير النص للصندوق النصي TEXTBOX1_TextChanged

 وتكتب هذا الكود البسيط

if textbox1.text.length >= 14 then
sendkey.send ("{BACKSPACE}")
end if

ارجوا ان اكون افدتك

السلام عليكم ورحمة الله

اسف علي الخطأ 

غير الكود الا فيه خطأ الي 

if textbox1.text.length >= 14 then
sendkeys.send ("{BACKSPACE}")
end

لا انصحك بإستخدام الرسالة في حدث تغير النص

if

وكذلك يمكن استخدام

SendKeys.Send("{TAB}")

للانتقال الى الحقل الذي يليه بعد وصول عدد الاحرف أو الارقام

If Len(UsernameTextBox.Text) = Me.UsernameTextBox.MaxLength Then

SendKeys.Send("{TAB}")

End If

انا افضل هذه الطريقة 

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

        TextBox1.MaxLength = 14

    End Sub