AccessTr.neT

Tam Versiyon: Metin Alanı Hakkında
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhabalar,

Tablomdaki metin alanına veriyi bir form vasıtasıyla giriyorum. Ancak bu verinin kesinlikle aşağıdakilerden oluşmaması gerekiyor;

Boşluk, Nokta, virgül, iki nokta, noktalı virgül, tırnak, soru işareti ünlem, yüzde, &, düz ve ters slaşlar vs. Yani veri sadece harf veya sayı kategorisinde olmalı. Bu nasıl düzenlenebilir? Tşk..
yukarıda tanımladığım konuda tablodaki veri tipi "metin" değil "not" olacak.
sayın notrino,

bahsettiğiniz talebinize yönelik olarak;

ilgili metin denetiminin GÜNCELLEME SONRASINDA olay yordamı içerisine

Kod:
Dim gecersizler As Variant
Dim a, b As Integer




gecersizler = Array("\", "/", ":", "*", "?", """", "<", ">", "|", "+", "-", ".", ",", ";")
For a = 0 To UBound(gecersizler)
b = InStr(1, ad_soyad, gecersizler(a))
If b > 0 Then
MsgBox (gecersizler(a) & " karakteri GEÇERSİZDİR." & vbCr & "Sadece,SAYI ve METİN yazınız"), vbCritical, "GEÇERSİZ KARAKTER UYARISI"
Me.ilgili_metin_denetiminin_adi = Null
Me.Undo
Exit For
End If
Next

kodlarını yazıp deneyiniz.

lütfen,Site Kuralları gereği,her ne için olursa olsun;
içeriğinde farazi gerçek dışı uydurma veriler ve sonuçları görebilmek üzere de birkaç kayıt içerecek halde örnek uygulamanızı dahil etmeye özen gösteriniz.

bilginize...iyi çalışmalar,saygılar.
Selamlar,

Yanıt için teşekkürler. Ancak sanırım çalışmıyor, hata veriyor. Bir de siz test eder misiniz? Tşk.
sayın notrino,

Alıntı:Ancak sanırım çalışmıyor, hata veriyor.

ifadenizi yazmakla birlikte,nasıl bir hata aldığınızı da belirtmeniz veya ekran görüntüsünü eklemeniz daha yerinde olurdu.böyle durumlarda,lütfen bu bilgileri ya da ekleri de dahil etmeye özen gösteriniz.teşekkürler.

EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Tamam teşekkürler..