السلام عليكم ورحمة الله وبركاته
اخي الكريم
بالنسبة لسؤالك الجزء الأول منه يمكنك استخدام الخاصية MaxLength وتضع أي رقم تريد وليكن 7
او بالكود مع تحميل الفورم تضع الكود التالي
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
TextBox1.MaxLength = 7
End Sub
اما الجزء الثاني بهذا الكود في حدث Leave
كود :
Private Sub TextBox1_Leave(sender As Object, e As EventArgs) Handles TextBox1.Leave
If TextBox1.Text.Length < 7 Then
MsgBox("لايمكن ان يكون النص اقل من 7 احرف")
End If
End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات