AccessTr.neT
Kaç KArakter. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kaç KArakter. (/konu-kac-karakter.html)



Kaç KArakter. - derbederali1971 - 28/05/2014

Merhaba,

Ekteki örnekte form1 de bir metin birde listbox'ım var. LOT girdiğim rakamların arasına virgül koyuyorum örneğin 125,1256,1248, gibi Sonra çalıştır komutuna tıkladığımda. 125 in 3 karakter,1256 nın 4 karakter 1248 inde 4 karakter olduğunu bulup sıra 'ya yazmasını istiyorum.

Virgülden sonraki virgüle kadar kaç karakter.

İnşallah anlatabilimişimdir Lol Teşekkürler,


Cvp: Kaç KArakter. - alpeki99 - 28/05/2014

Zaman darlığından çok kaba bir kod oldu ama inşaallah işinizi görür:


dizi = Split(Me.Lot, ",")

kacaKadar = UBound(dizi)


For i = 0 To kacaKadar

deger = dizi(i)
uzunluk = Len(dizi(i))
Me.Liste.AddItem (deger & " " & uzunluk & " karakter")

Next i

Bu kodları butonun tıklanma olayına yazacaksınız.


Cvp: Kaç KArakter. - derbederali1971 - 29/05/2014

Alp bey merhaba,
Çok güzel olmuş ellerinize sağlık projemin birkaç yerinde lazımdı teşekkürler.