04-01-2014, 06:12 PM
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:
En son formun Load koduna şunu yazın ve tamamdır:
Şimdi çalıştıralım.
Çalıştırdığınızda çalıştığını göreceksiniz.
Bu kadar..
Ö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:
Kod:
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 SubEn son formun Load koduna şunu yazın ve tamamdır:
Kod:
security("buraya şifrenizi yazın")Şimdi çalıştıralım.
Çalıştırdığınızda çalıştığını göreceksiniz.
Bu kadar..
Okyanusta batan gemidir yalnızlık,
Çok derinlerdedir gücün yetmez onu oradan çıkarmaya.
Kaybolup gider daha sonra.
Kendi kendine konuşmaktır yalnızlık...
Belkide en iyi tarafıdır bu
Kendini sorgularsın, bir kez olsun çekersin köşeye nefsini hayatı anlamaya çalışırsın.
Çok derinlerdedir gücün yetmez onu oradan çıkarmaya.
Kaybolup gider daha sonra.
Kendi kendine konuşmaktır yalnızlık...
Belkide en iyi tarafıdır bu
Kendini sorgularsın, bir kez olsun çekersin köşeye nefsini hayatı anlamaya çalışırsın.