Untuk membuat menu login terlebih dahulu klik kanan pada project kemudian pilih add item window form.
Klik OK pada login form kemudian ketik syntax di bawah ini.
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
If UsernameTextBox.Text = "uLee" And PasswordTextBox.Text = "starfire" Then
MDIParent1.Show()
Me.Visible = False
Else
MsgBox("login gagal,coba ulangi lagi")
End If
End Sub
Berikut tampilan form login
Diposting oleh
Uly Kasturi
0 komentar:
Posting Komentar