Visual Basic Giriş Formu Yapımı!
Merhaba Arkadaşlar Ben Ümit PALA Bugün sizlere Visual Basicde Giriş Formu Yapımını Anlatıcam. Databasesiz Çok Kolay.
Kodlar :
Private Sub Command1_Click()
If Text1.Text = "umitpala" And Text2.Text = "123123" Then
Form1.Hide
Form2.Show
Else
a = a + 1
MsgBox "Kullanıcı Adı Veya Şifre Yanlış Tekrar Deneyiniz..", 64, "HATA"
End If
If a = 3 Then
Text1.Enabled = False
Text2.Enabled = False
Command1.Enabled = False
MsgBox "3 Sefer Hatalı Giriş Yaptınız", 64, "UYARI!"
MsgBox "Güle Güle..", 64, "Güle Güle.."
Form1.Hide
Form2.Hide
End If
End Sub
Private Sub Form_Load()
a = 0
End Sub
Video : Visual Basic Kayıt Formu Yapımı Databasesiz.! - YouTube Yüklendi !
Merhaba Arkadaşlar Ben Ümit PALA Bugün sizlere Visual Basicde Giriş Formu Yapımını Anlatıcam. Databasesiz Çok Kolay.
Kodlar :
Private Sub Command1_Click()
If Text1.Text = "umitpala" And Text2.Text = "123123" Then
Form1.Hide
Form2.Show
Else
a = a + 1
MsgBox "Kullanıcı Adı Veya Şifre Yanlış Tekrar Deneyiniz..", 64, "HATA"
End If
If a = 3 Then
Text1.Enabled = False
Text2.Enabled = False
Command1.Enabled = False
MsgBox "3 Sefer Hatalı Giriş Yaptınız", 64, "UYARI!"
MsgBox "Güle Güle..", 64, "Güle Güle.."
Form1.Hide
Form2.Hide
End If
End Sub
Private Sub Form_Load()
a = 0
End Sub
Video : Visual Basic Kayıt Formu Yapımı Databasesiz.! - YouTube Yüklendi !
Son düzenleme:


