[Anas Mahmoud]

ال Validation افضل بصراحة وكثر تطورا وامانا

عدل الخاصية AutoValidate للفورم الى Disable

اضف حدث Validating الى مربعات النص

كود :

   Private Sub TextBox3_Validating(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles TextBox3.Validating, TextBox1.Validating, TextBox2.Validating

       Dim txt As TextBox = sender
       e.Cancel = String.IsNullOrWhiteSpace(txt.Text)

   End Sub

الان عند الحاجة للتأكد من المربعات ليست فارغة استخدم ValidateChildren :

كود :

       If Me.ValidateChildren() = False Then
           MsgBox("يجب ملأ كافة الحقول")
           Return
       End If