2 Tane TextBox
2 Tane Label
1 Tane Button
istediğim şekilde yerleştiriyoruz bunları
Form1'e bu kodları giriyoruz :
Private Sub Command1_Click()
If Text1 = "Kullanıcı Adı" And Text2 = "Şifre" Then
Me.Hide
Form2.Show
MsgBox " Giriş Başarılı"
Else
If Text1 = "Kullanıcı Adı" And Text2 = "Şifre" Then
Me.Hide
Form1.Show
Else
If Text1 = "" And Text2 = "" Then
MsgBox "Kullanıcı adı ve şifreyi girin"
End If
End If
End If
End Sub
Sonra bir form daha açıyoruz form2 oluyor
Sonrada exe yapıyoruz
Mantık:
Kullanıcı adı ve şifreyi girince form2'yi açıyor form1 kapanıyor form1'i istediğiniz gibi düzenleyin orasi giriş yapılmış kısım