Skip to main content

#EvdeKal


metin kutusu giriş

metin kutusu giriş

Çözüldü #1
bir form oluşturdum ve içinde metin kutuları var ben bunlardan giriş yapıyorum. şimdi bir metin kutusu var ben bu alana sadece A, F, G, J, ve H harflerine izin vermesini istiyorum yani diğer harflere bastığımda yazmasın. Yardımcı olucak arkadaşlara thank you...
*basit bir örnek eklerseniz kendi proje aktarırım.
Cevapla
Çözüldü #2
Merhaba

Kod:
If (Not Chr(KeyAscii) = "a") Or (Not Chr(KeyAscii) = "A") Then

  KeyAscii = 0

Else

End If


Burada eğer tuş küçük "a" harfi ya da büyük "A" harfi değilse basılan tuşu iptal ediyoruz.

Yukarıdaki yazılanları metin kutusunun "Tuşa Basıldığında" kısmına kod olarak yazın.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #3
ya ben sadece A F G J D H ve L harflerinine izin versin istiyorum
hani şu açılan kutular varya verileri belirliyosun oka tıklayınca o veriler açılıyor seçiyorsun onun gibi
Cevapla
Çözüldü #4
Yani ferhatozge ben sana ne diyeyim. Dikkat etmeden cevap yazıyorsun . Yukarıda ben yazdım "a" ve "A" sen onları yap A F vs. her ne ise Img-grin Daha ne diyeyim Hoba
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #5
ya kızacaksın belki ama yapamadım senin yazdığın kodu yaptım tamam A tuşuna izin veriyor diğerlerine vermiyor ama ben A'ya F'e H'a vb. harflerede izin vermesini istiyorum. BAK BEN BÖYLE YAPTIM HATA VERİYOR

Private Sub DURUM_KODU_KeyPress(KeyAscii As Integer)
If (Not Chr(KeyAscii) = "a") Or (Not Chr(KeyAscii) = "A") Then
If (Not Chr(KeyAscii) = "f") Or (Not Chr(KeyAscii) = "F") Then

KeyAscii = 0

Else

End If
End Sub
Cevapla
Çözüldü #6
(18/11/2008 23:44)ferhatozge Adlı Kullanıcıdan Alıntı: ya kızacaksın belki ama yapamadım senin yazdığın kodu yaptım tamam A tuşuna izin veriyor diğerlerine vermiyor ama ben A'ya F'e H'a vb. harflerede izin vermesini istiyorum. BAK BEN BÖYLE YAPTIM HATA VERİYOR

Private Sub DURUM_KODU_KeyPress(KeyAscii As Integer)
If (Not Chr(KeyAscii) = "a") Or (Not Chr(KeyAscii) = "A") Then
If (Not Chr(KeyAscii) = "f") Or (Not Chr(KeyAscii) = "F") Then

KeyAscii = 0

Else

End If
End Sub

If (Not Chr(KeyAscii) = "a") Or (Not Chr(KeyAscii) = "A") Or (Not Chr(KeyAscii) = "f") Or (Not Chr(KeyAscii) = "F") bu şekilde THEN den önce her harf için araya OR koymalısın.

(Not Chr(KeyAscii) = "a")
(Not Chr(KeyAscii) = "F")
(Not Chr(KeyAscii) = "L")
(Not Chr(KeyAscii) = "N")
vs. Then den önce olacak aralarında OR olacak.

Yalnız IF gibi temel bir yapıyı bilmiyorsan bundan sonra yanmışsın demek Ohmy
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da