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
Posting Komentar