Sayın Hocalarım,
Butonlara koyduğum şifrelerde, şifre yazılırken ne yazdığımı herkes görüyor. Bunu numara yerine veya metin yerine *** gibi görünmesini sağlayabilirmiyiz. Örnek kodu aşağıda görebilirniz. Şifre de 123
YARDIMLARINIZ İÇİM ŞİMDİDEN TEŞEKKÜRLER.
Private Sub TKLF_Click()
Dim Celoyce As String
Celoyce = InputBox("Burayı Açmak için Lütfen Şifre Girin.", "Şifre Ekranı")
If Celoyce = "123" Then
' MsgBox "Şifre Tamam ", vbOKOnly, "İkaz"
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Teklifler"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
MsgBox ("Hatalı Şifre")
End If
End Sub
Buton şifrelerinin görünmesi
Bu Konudaki Yorumlar |
Buton şifrelerinin görünmesi - Yazar: orhantanriverdi - 19/01/2011, 15:16
Cvp: Buton şifrelerinin görünmesi - Yazar: alpeki99 - 19/01/2011, 15:30
|
Konuyu Okuyanlar: 1 Ziyaretçi