30/10/2008, 00:28
30/10/2008, 00:35
şöyle bişi yapabilirsiniz;
Dim sifre
sifre = InputBox(vbcritial, "LÜTFEN YÖNETİCİ KODUNUZU GİRİNİZ")
If sifre <> "123" Then 'buraya belirlediğin şifreyi yazarsın
MsgBox "Yetkisiz Kullanıcılar Bu Formu Açamaz", vbApplicationModal, "ÜZGÜNÜM"
Cancel = True
End If
tabi bu kodları formun açıldığında olay yordamına yazacaksınız.
saygılar.
Dim sifre
sifre = InputBox(vbcritial, "LÜTFEN YÖNETİCİ KODUNUZU GİRİNİZ")
If sifre <> "123" Then 'buraya belirlediğin şifreyi yazarsın
MsgBox "Yetkisiz Kullanıcılar Bu Formu Açamaz", vbApplicationModal, "ÜZGÜNÜM"
Cancel = True
End If
tabi bu kodları formun açıldığında olay yordamına yazacaksınız.
saygılar.
30/10/2008, 00:47
tmm yaptım ama olmadı.programa bakrsanız.
30/10/2008, 00:54
kodları tıklalndığında olayına yapıştırmışsınız yani demişsiniz ki hem formu aç hemde şifreyi sor ))
yani açılmasını istediğiniz formun açıldığında olay yordamına yazacaktınız.
yapıştırdım ilişikte çalışıyor.
bu arada şifreyi istediğin şekilde belirleyebilirsin: 123 yazdığım yere siz istediğiniz şifreyi yazabilirsiniz .
yani açılmasını istediğiniz formun açıldığında olay yordamına yazacaktınız.
yapıştırdım ilişikte çalışıyor.
bu arada şifreyi istediğin şekilde belirleyebilirsin: 123 yazdığım yere siz istediğiniz şifreyi yazabilirsiniz .
30/10/2008, 00:57
tmm ama şimdi nası açıcam formu sanırım yanlış anladınız..yada bn yanlış anlattım sorduktan sonra açılması gerekio!!!!
30/10/2008, 00:57
bu şekilde bir anlatım yaptım umarım işinizi görür. formunuzun şifreli olmasını ve başkalarının girmesini engellersiniz.