Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub Command1_Click()
- 'newbie kch belajar program ssstttt jangan di ganggu wkwkwk
- ' my name is flazer you KNOW
- ' my team KCH Kalimantan Cyber Hacked
- If Text1 = ("kch") And Text2 = ("forever") Then
- frmmenu.Show
- Me.Hide
- MsgBox "login berhasil", vbInformation, "berhasil"
- Else
- MsgBox " maaf username atau password salah", vbinfomation, "ulangi"
- End If
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement