Şifreleme By: mesut1997 Date: June 23, 2008, 08:07:27 PM
Aşağıdaki kodu form load'a yapıştırın
Private Sub Form_Load()
If InputBox("LÜTFEN ŞİFREYİ GİRİNİZ") <> "ekin" Then
MsgBox ("ŞİFREYİ BİLEMEDİNİZ BİLGİLER ÜZERİNDE DEĞİŞİKLİK YAPAMAZSINIZ")
Text1.Locked = True
End If
Form1.Caption=("EKOMAT YAZILIM")
End Sub
Ynt: Şifreleme By: melek_03 Date: October 03, 2010, 02:03:28 PM
teşekkürler..
Ynt: Şifreleme By: antibiyotik Date: February 05, 2011, 07:11:33 PM
tesekkürler
