Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
18/11/2008 22:23
Konu Sahibi
ferhatozge
Yorumlar
8
Okunma
2889
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

ferhatozge

Aktif Üye
Kullanici Avatari
Aktif Üye
F.... İ....
94
31/10/2008
10
Afyonkarahisar
10/09/2017,15:55
Çözüldü 
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

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.090
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
31/08/2017,19:08
Çözüldü 
Merhaba

Kod:
1
2
3
4
5
6
7
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

ferhatozge

Aktif Üye
Kullanici Avatari
Aktif Üye
F.... İ....
94
31/10/2008
10
Afyonkarahisar
10/09/2017,15:55
Çözüldü 
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

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.090
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
31/08/2017,19:08
Çözüldü 
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

ferhatozge

Aktif Üye
Kullanici Avatari
Aktif Üye
F.... İ....
94
31/10/2008
10
Afyonkarahisar
10/09/2017,15:55
Çözüldü 
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

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.090
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
31/08/2017,19:08
Çözüldü 
(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


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Kısayol Tuşuyla Liste Kutusu Üzerinden Değer Atama mehmetb84 6 103 Dün, 12:20 mehmetb84
Çözüldü Metin Dosyasından Otomatik Veri Çekme cazcaz678 8 506 01/08/2017, 16:10 pfilcik
Çözüldü Metin Veya Sayı Birleştirme ufukcem 10 547 22/06/2017, 09:31 ufukcem
Çözüldü Metin Ayırma ufukcem 2 195 16/06/2017, 10:10 ufukcem
Çözüldü Giriş Yaparken Tabloda Tanımlı İse Kaydetsin barcins 8 545 12/05/2017, 10:14 barcins

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.