Çalışan uygulama Görüntüsü
Tasarım aşamasında aşağıdaki nesneleri direk yerleştiriyoruz
Hazırlanacak form yüzü
Gerekenler nesneler
2 adet label
1 adet button
Burada 2 fonksiyon var ilki buton basılınca olan ve kontrölü sağlayan fonsiyon
ikincisi form yüklenirken label ve butonumuza otomatik yazılar yazan kısım
Bir program çalışmaya başladığında ilk olarak form load fonksiyonu direk çalışmaya başlıyacağı için label ve text kutularımız otomatik olarak değerleri almaktadır
İkinci olarak butonumuza basınca gerçekleşecek olaylarikinci fonksiyonda yer almaktadır
Kodu direk yapıştırıyoruz
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "admin" And TextBox2.Text = "123456" Then
MsgBox("Giris Basarili") 'basarili ise giris yapilir
Else
Label1.Text = "" 'kullanici adi kutusu temizlenir
Label2.Text = "" 'sifre kutusu temizlenir
MsgBox("Hatali Sifre") 'basarili degilse uyari verilir
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = "Kullanici Adi"
Label2.Text = "Sifre"
Button1.Text = "Giris Yap"
End Sub
End Class