- Kayıt
- 13 Temmuz 2009
- Mesajlar
- 3.500
- Beğeniler
- 0
Merhaba ben Unforgiven. Sizlere VB'te form şifrelemeyi öğreteceğim.
1. Forma aşağıdaki araçları yerleştirin.
2 adet textbox
2 adet label
2 adet button
2. bir windows form da gerekiyor
Labellara gereken isimleri veriyoruz,
Label1'e "kullanıcı adı"
Label2'ye "şifre"
Button1'in Click olayına aşağıdaki komutları yazıyoruz;
Button2'nin de Click olayına aşağıdaki komutları yazıyoruz; (bu komut textboxları temizlemeye yarıyor)
1. Forma aşağıdaki araçları yerleştirin.
2 adet textbox
2 adet label
2 adet button
2. bir windows form da gerekiyor
Labellara gereken isimleri veriyoruz,
Label1'e "kullanıcı adı"
Label2'ye "şifre"
Button1'in Click olayına aşağıdaki komutları yazıyoruz;
Kod:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "rıdvan" And textbox2.text= "12345" Then
MsgBox("hoşgeldiniz")'kullanıcı bilgisi doğru ise hoşgeldiniz mesajı variyor'
Form2.Show() ' şifre dogrulanırsa ikinci form' u acıyor'
Else
MsgBox("kayıtlı kullanıcı degil")
End If
End Sub
Kod:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Text = " "
TextBox2.Text = " "
End Sub