Visual Basic'te Üyelik Okutma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

x60

Seçkin Üye
Katılım
18 Kas 2015
Mesajlar
523
Tepki puanı
6
Yaş
101
10 HİZMET YILI
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Bu dersimizde kullanıcı adı ve şifre girince o üyenin sayfasını açan bir program yapacağız.[/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]VB 2010 Express [/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Öncelikle 2 forma ihtiyacımız var ; 1.si giriş 2.si üye formu.[/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Giriş Formu için ihtiyacımız olanlar:[/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]- 2 label [/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]- 2 Textbox[/FONT]
[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]- 1 Button[/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Form2'yi ekleyip form1'e geri dönün. Şimdi üyemizin k.adı=sarı şifresi=kırmızı olsun. Bunun için button1'e çift tıklayıp bu kodları giriyoruz:[/FONT][/FONT]


PHP:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "sarı" And TextBox2.Text = "kırmızı" Then
            Me.Hide()
            form2.show()
        End If
    End Sub

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Şimdi de 2. formda:[/FONT]
[/FONT]



[font='Open Sans', Tahoma, Verdana, Arial, sans-serif]- 2 label olacak[/FONT]


[font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]1. label = merhaba, 2. label ise text'ini silin. Mesela üyemizin ismi Galatasaray olsun. Form2'nin load'ına bu kodları yazın:[/FONT][/FONT]

PHP:
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Form1.TextBox1.Text = "sarı" And Form1.TextBox2.Text = "kırmızı" Then
            Label2.Text = "Galatasaray"
        End If
    End Sub


[font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Ve işte oldu. Ama son bir şey daha: Eğer giriş formunda üyenizin şifresini yazarken gerçek sitelerde olduğu gibi "*" karakterini çıkartmak istiyorsanız form1deki textbox2 nin properties ten password char = * yapmanız yeterlidir.[/FONT][/FONT][/FONT]

[font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif][font='Open Sans', Tahoma, Verdana, Arial, sans-serif]Coder x60[/FONT][/FONT][/FONT]
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst