[Taha Okla]

وعليكم السلام ورحمة الله وبركاته :
عيدكم مبارك ..

عدل الكود التالي :

كود :

   Public tPwd As Int16 = 0
   Private Sub btnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click

       If cboUser.Text = "" Then cboUser.Focus() : Exit Sub
       If txtPass.Text = "" Then txtPass.Focus() : Exit Sub
       If Check_user() = False Then
           MsgBox("كلمة المرور لهذا المستخدم غير صحيحة", MsgBoxStyle.Critical, "رسالة خطأ")
           tPwd += 1
           TextBox1.Text = 3 - tPwd
           If tPwd = 3 Then FRM_mainmenu.Close()
           '  Exit Sub
       End If