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


0 komentar:

Posting Komentar

About this blog

Don't Give Up

Pengikut

Diberdayakan oleh Blogger.

uLee's Post

Add your Comment


ShoutMix chat widget
// JavaScript Document