Private Sub Command1_Click()
If Text1.Text = "duyban" And Text2.Text = "bancute" Then
MsgBox "Dang Nhap Thanh Cong !", vnOKOnly, "Login Cs 1.1 Halife"
Form2.Show
Form1.Hide
Else
MsgBox "Dang Nhap That Bai !", vnOKOnly, "Login Cs 1.1 Halife"
End If
End Sub
If Text1.Text = "duyban" And Text2.Text = "bancute" Then
MsgBox "Dang Nhap Thanh Cong !", vnOKOnly, "Login Cs 1.1 Halife"
Form2.Show
Form1.Hide
Else
MsgBox "Dang Nhap That Bai !", vnOKOnly, "Login Cs 1.1 Halife"
End If
End Sub