Hỏi về from đăng nhập

[Minh Đức 1309]

E có 1 code đơn giản về from đăng nhập mọi thứ ổn trừ cái đấu x ở from khi tích vào dấu X thì file vẫn sẽ hoạt động bt mà k cần đăng nhập.Mọi người có cách nào khắc phục k ạ.Em xin cảm ơn!!!!!!!!!!!!!!

 

[Hieu042]

- Ở Form đăng nhập có Textbox1 (User), Textbox2(Pass). Và 1 Button

Khi nhập User và Pass nhấn đăng nhập, Sau khi thỏa mãn điều kiên thì cho Form_Main.Show

 

[giaiphap]

E có 1 code đơn giản về from đăng nhập mọi thứ ổn trừ cái đấu x ở from khi tích vào dấu X thì file vẫn sẽ hoạt động bt mà k cần đăng nhập.Mọi người có cách nào khắc phục k ạ.Em xin cảm ơn!!!!!!!!!!!!!!

Thử dùng code này xem sao.

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = 0 Then
        MsgBox "xin loi ban khong duoc phep tat Form theo cach nay"
        Cancel = 1
    End If
End Sub

 

[Minh Đức 1309]

Thử ùng code này xem sao.

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = 0 Then
        MsgBox "xin loi ban khong duoc phep tat Form theo cach nay"
        Cancel = 1
    End If
End Sub

Cảm ơn thầy/cô rất nhiều !!!