Bugün size Visual Basic'te InputBox kullanarak güvenlik sistemi yapmayı göstereceğim.
Öncelikle Visual Basic'te bir proje açalım.
Şimdi formun üzerine sağ tıklıyoruz ve View Code diyoruz.
Sonra şu kodları yazıyoruz:
Sub security(password As String) 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
En son formun Load koduna şunu yazın ve tamamdır:
security("buraya şifrenizi yazın")
Şimdi çalıştıralım.
Çalıştırdığınızda çalıştığını göreceksiniz.
Bu kadar...
0 yorum:
Yorum Gönder