Kamis, 02 Juni 2011

MEMBUAT FORM LOGIN

Kali ini qt latihan membuat form login dengan sederhana, data langsung di input dalam coding bkn dlm database

Klik kanan pada project yg kita buat >>add>>new item

Pilih windows form>>form login>>add


Maka akan terbentuk sbb :

Klik 2X button OK, kemudian tulis coding berikut :

Public Class LoginForm1

Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click

If UsernameTextBox.Text = "fetty" And PasswordTextBox.Text = "123" Then

MDIParent1.Show()

Me.Visible = False

Else

MsgBox("login gagal,coba ulangi lagi")

End If

End Sub

Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click

Me.Close()

End Sub

End Class

Tidak ada komentar:

Posting Komentar