04-09-2017, 09:23 PM
Bugün size Visual Basic'te InputBox kullanarak güvenlik sistemi yapmayı göstereceğim.
Şimdi formun üzerine sağ tıklıyoruz ve View Code diyoruz.
Sonra şu kodları yazıyoruz:
Kod
Sub security(password As String)
Şimdi formun üzerine sağ tıklıyoruz ve View Code diyoruz.
Sonra şu kodları yazıyoruz:
Kod
Sub security(password As String)
Kod:
Dim d = InputBox("Parolanızı giriniz", "Güvenlik Sistemi")
If d <> password Then
MsgBox("Yanlış parola", MsgBoxStyle.Critical, "Hata")
security(password)
ElseIf d = password Then
MsgBox("Başarıyla giriş yapıldı", MsgBoxStyle.Information, "Başarılı")
Me.Close()
End If
End Sub