Koding Loggin Pada VB

Source Code VB

Loggin Form
Listing Program

Private Sub Command1_Click()

Do While (True) If Text1 = "Nama Saya" And Text2 = "Rahasia" Then

pesan = MsgBox("Password Benar") End Else pesan = MsgBox("Password Salah.. ulangi lagi")

Text1.Text = ""

Text2.Text = ""

Text1.SetFocus

Exit Do

End If

Loop

End Sub

Salam
DUNIA-VB

Bagikan

Jangan lewatkan

Koding Loggin Pada VB

4/ 5

Oleh Vainit

Vainit 11:24 AM 1 Komentar