1. sayfa (Toplam 1 sayfa)

VB Åžifreli TextBox

Gönderilme zamanı: 30 Ara 2007, 14:14
gönderen mayhemious
Formun üzerine text1 çiniziyoruz daha sonra form load'a kodu yapistiriyoruz

Kod: Tümünü seç

Private Sub Form_Load()
'sifreniz:  mayhem

If InputBox("sifreyi giriniz") <> "mayhem" Then
MsgBox ("sifreyi bilemediniz.Bilgiler üzerinde degisiklik yapamazsiniz.....!")
Text1.Locked = True
End If

End Sub
mayhem sifresi inputbox'a girilmedigi sürece text üzerinde degisiklik yapilmiyor