Girişte Programınıza Şifreyle Girmek(visual basic)
1 sayfadaki 1 sayfası
Girişte Programınıza Şifreyle Girmek(visual basic)
1 tane text box bi tane command button ekleyin
aşağıdaki kodu yapıştırın
Kod:
Private Sub Command1_Click()
Dim sfr As Integer
sfr = Text1
If sfr = 85 Then
Form1.Hide
Form2.Show
Else
MsgBox "Yanlış Şifre"
End If
End Sub
aşağıdaki kodu yapıştırın
Kod:
Private Sub Command1_Click()
Dim sfr As Integer
sfr = Text1
If sfr = 85 Then
Form1.Hide
Form2.Show
Else
MsgBox "Yanlış Şifre"
End If
End Sub
Similar topics
» Visual Basic 6.0 Kurulumsuz 4,62 Mb
» Cd Rom'u Açıp Kapatan Kod(visual basic)
» süper bi saat(visual basic)
» Çarpım Tablosu Yapmak(visual basic)
» Titreyen Form Yapmak(visual basic)
» Cd Rom'u Açıp Kapatan Kod(visual basic)
» süper bi saat(visual basic)
» Çarpım Tablosu Yapmak(visual basic)
» Titreyen Form Yapmak(visual basic)
1 sayfadaki 1 sayfası
Bu forumun müsaadesi var:
Bu forumdaki mesajlara cevap veremezsiniz