1. Ambil Form Aktif misalkan Form1
2. buat tampilan seperti gambar dibawah
3. berikut adalah properties yang dibutuhkan
label1
label2
label3
Textbox1
Textbox2
Button1
Button2
PictureBox
4. Ketikan Koding Dibawah Ini
Dim Form3 As New Form3
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("Username Kosong")
ElseIf TextBox2.Text = "" Then
MsgBox("Password Kosong")
Else
If TextBox1.Text = "Rio Pw.X" And TextBox2.Text = "kamu" Then
MsgBox("Berhasil Login")
Form3.Show()
Else
MsgBox("Data Tidak Ditemukan")
End If
End If
End Sub
Selamat Mencoba !!!!!
EmoticonEmoticon