Skip to main content

AccessTr.neT


Etiketler
Yazar: okileturc - Cevaplar: 4 - İzleme: 3482
Len + Trim+ NZ kullanımı
Arkadaşlar

Alıntı bir uygulamada aşağıdaki üçlü kullanımı
ilk kez gördüm ve ilginç buldum. Paylaşmak
istedim.


IIf (Len(Trim(Nz(ListBoxADI)))>0;Yapılacaklar;Yapılmayacaklar)


If Len(Trim(Nz(Me!ListBoxADI)))>0 Then
Yapılacaklar
Else
Yapılmayacaklar
End If


Örneğin form üzerinde bir listbox da veri olup olmadığını kontrol
etmek için çok kullanışlı bir tercih. Ben yoğun olarak Len()
kullanıyorum ancak sadce ">0" olarak kullanıyorum . Oysa bu
kullanım şe
Yazar: |By|KiDnArUt| - Cevaplar: 4 - İzleme: 3325
Klavye testi Len komutu
Merhabalar

Öğrenmek istediğim konu ile ilgili bilgi alabileceğim bir anlatım, sunum yada örnek teşkil edebilecek bir program arayışı içerisindeyim baya bakındım ama konuyla ilgili istediğim şekilde bir veriye ulaşamadım.

Kısacası klavye testlerinde olduğu gibi yazılan kelimeleri birebir karşılaştıracak doğruyu ve yanlışı bulacak hatalı olanların altını çizecek net sayısını çıkaracak bu konuyla ilgili yardımcı olacak dökümanlar gerekmektedir şimdiden teşekkür ederim.


örnek: katipler.net/on-pa
Yazar: direnist - Cevaplar: 9 - İzleme: 5683
Alan kontrolünde IsNull, Len ve Trim fonksiyonlarının kullanımı.
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 il
Yazar: kanakan52 - Cevaplar: 2 - İzleme: 727
Accsess Sorgsusunda Len Komutu Kullanımı
Arkadaşlar merhaba,

Aşağıdaki kodlarla Accsessten Excel Combobox'a tablodaki verileri alıyorum. Ancak tablo içinceki ilgili alanda uzunluğu 7 den büyük olanları almak istiyorum.

len(kod)>7 gibi.

Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\HesapPlani.accdb"
CHesap.Column = baglan.Execute("select [Kod] from [Hesap_Plani] order by kod").GetRows
baglan.Close


Desteğiniz için şimdiden teşekkür ederi