Alan kontrolünde IsNull, Len ve Trim fonksiyonlarının kullanımı.
Tarih
16/06/2013 22:15
Konu Sahibi
direnist
Yorumlar
9
Okunma
2344
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
direnist
Aktif Üye
Kullanici Avatari
Aktif Üye
D.... S....
334
05/11/2008
118
İstanbul
Ofis 2010 64 Bit
24/03/2017,21:59
Çözüldü 
Merhaba arkadaşlar;
Ekli dosyadaki örnekte değer girilecek alanlar boş (IsNull) yada karakter sayısı sıfır ise (LEN(Trim(Me.KontrolAdi)=0) ise uyarı vermesini değil ise kodların geri kalanında ne yazıyorsa işlemesini istiyorum.
Örnekte, "OR" kullanımında mı hata yapıyorum bilmiyorum ama bütün alanlar dolu iken bile hep uyarı vermektedir.
Örnekteki gibi tek if yapısı ile alanların boş-dolu kontrolünü yapabilmem için bilgilerinizi rica ederim.
Mümkünse nerede hata yaptığımı da bir iki cümle ile yazarsanız çok sevinirim.
Teşekkürler.
İyi akşamlar.


Ek Dosyalar
.rar   direnist.rar (Dosya Boyutu: 17,54 KB / İndirme Sayısı: 13)
Cevapla

fatih karagöl
Aktif Üye
Kullanici Avatari
Aktif Üye
167
05/10/2010
88
Edirne
-
15/12/2015,17:38
Çözüldü 
Sponsor Reklam
selamlar
If IsNull(Me.Adi) Or Len(Trim(Me.Adi)) = 0 şeklinde yazmalısınız. Ayrıca her bir denetim için ayrı bir kontrol kodu yazmanızı öneririm. Örnekte bir önemi olmasa bile şekilde alışmanız ileri seviyeleriniz açısından sağlıklı olacaktır.
Saygılar
Hayatta listbox kullanmam..
Cevapla

direnist
Aktif Üye
Kullanici Avatari
Aktif Üye
D.... S....
334
05/11/2008
118
İstanbul
Ofis 2010 64 Bit
24/03/2017,21:59
Çözüldü 
Merhaba Fatih Hocam;
Dediğiniz gibi her metin kutusu için ayrı ayrı bir if bloğu içinde
If IsNull(Me.Adi) Or Len(Trim(Me.Adi)) = 0 şeklinde yazdım yine tüm alanlar dolu olmasına rağmen uyarı veriyor.

tabi metin kutularının adlarını değiştirerek yazdım..hepsine yukardakini yazmadım.
Cevapla

POWER
Uzman
Kullanici Avatari
Uzman
U.... Ö....
1.857
02/04/2010
İzmir
Ofis 2003
Dün,11:49
Çözüldü 
Sponsor Reklam
Parantezler hatalı... Aşağıdaki gibi yapınız....

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Komut9_Click()

If (IsNull(Me.Adi) Or Len(Trim(Me.Adi)) = 0) Or _
   (IsNull(Me.Soyadi) Or Len(Trim(Me.Soyadi)) = 0) Or _
   (IsNull(Me.Email) Or Len(Trim(Me.Email)) = 0) Then
    
         MsgBox "lütfen tüm alanları doldurunuz..!"
    
    Exit Sub
End If
    
    DoCmd.GoToRecord , , acNewRec
    
End Sub


Please return your positive or negative ...
Cevapla

direnist
Aktif Üye
Kullanici Avatari
Aktif Üye
D.... S....
334
05/11/2008
118
İstanbul
Ofis 2010 64 Bit
24/03/2017,21:59
Çözüldü 
Hocam çok teşekkür ederim. Sorunum çözülmüştür.
Biz acemiler kafayı yesin diye mi bu VB editörünün hata denetimini daha güçlü yapmıyorlar acaba?
Saygılarımla.
Cevapla

POWER
Uzman
Kullanici Avatari
Uzman
U.... Ö....
1.857
02/04/2010
İzmir
Ofis 2003
Dün,11:49
Çözüldü 
Sponsor Reklam
Syntax olarak ( Yani Vba dizilimi ) olarak aç/kapa parantezler uyuştuğu için Vba compiler bu hatayı göremez. Bu gibi durumlarda değerleri Msgbox kullanarak yazdırırsanız doğru sonuca gidersiniz...
Please return your positive or negative ...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  tek formda butonla 2 altform kullanımı U.ALTUN 7 128 Dün, 15:22 U.ALTUN
  Msgbox Kullanımı hknct 2 39 13/03/2017, 21:56 hknct
  Buton ile rapor açarken kriterde like kullanımı nightashes 2 134 06/01/2017, 22:41 nightashes
  Zorunlu alan ve kaydet uyarıları ertans 10 350 31/12/2016, 11:06 atoz112
  iki tablo arasında girilen veriyi ikinci tabloda alan olarak oluşturma yardım bilservisci 8 332 15/12/2016, 11:49 atoz112


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status