Membuat Suatu Pemberitahuan dengan Cara membuat Password yang Benar atau Salah

1.Desain form ny terlebih dahulu ya guys supaya ngerti


2.Pengaturan Properties ny harus di perhatikan karna ini sangat menentukan .

NO
OBJECT
PROPERTIES
PENGATURAN
1
Form1
Text
Login
2
Label1
Text
Password
5
TextBox1
Name
TxtPas
7
Button1
Text
Proses


Name
Btnproses
8
Button2
Text
Tutup


Name
Btntutup

3.Tampilan Setelah Pengaturan Properties ya seperti ini lah dia


4.Pemberian Perintah/Intruksi Program

Program :


Jika memasukkan data atau keyword tertentu di TextBox1 (Password) dengan benar maka akan muncul suatu pemberitahuan dan jika memasukkan data atau keyword tertentu salah maka akan muncul pemberitahuan , dengan mengklik Button1 (Proses) . Dan jika ingin menutup program akan ada muncul pemberitahuan .

Perintah Program :
1.Perintah pada objek Button1(Proses) :

Private Sub Btnproses_Click(ByVal senderAs System.Object, ByVal e AsSystem.EventArgs) Handles Btnproses.Click
        If TxtPas.Text = "rahasia" Then
            MsgBox("Password yang Anda Masukkan Benar",MsgBoxStyle.Information,"Info Login")
        Else
            MsgBox("Password yang Anda Masukkan Salah", 10, "Info")
        End If
End Sub
2.Perintah pada objek Button2(Tutup) :

Private Sub Btntutup_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles Btntutup.Click
        Dim pesan As String
        pesan = MsgBox("Apakah Anda Ingin Menutup program ini?", MsgBoxStyle.YesNo + 32, "Tutup Program")
        If pesan = vbYes Then
            End
        Else
            Exit Sub
        End If
End Sub

Tampilan Program Saat Dijalankan :

1.

2.

3.

Ok guys 

Komentar