değerin içindeki verilerin sonundaki boşlukları silmek.

[a_self_lion]

Merhaba arkadaşlar

Dim SQLText, sayfaadi, deger, sonsira As String

sqltex e atadığım sql sorgumdan gelen mlzkodlarımdan Rst.Fields ile
deger değişkenime atıyorum

burada ki değerlerin bazılarının sonunda boşluk oluşuyor. bir sorguda normal bir sorguda boşluk oluyor anlamadım.

610104001005
5 den sonra bir de boşluk oluyor doğal olarak
sayfamdaki c sutununu daha önceki aldırdığım z.exists(deger) ile karşılaştırdığım zaman boşluk olduğu için eşleştirme yapamıyor.
Garip bazen oluyor bazen olmuyor.
Aklıma deger değişkenindeki değerlerin sonundaki boşlukları almak geldi.
Ama nasıl yapılacak bu.

 

[Necdet]

Merhaba,

Verileri doğrudan değil tek tek aktarırken trim yapabilirsiniz.
Aşağıdaki örnekte olduğu gibi örneğin.

RS.MoveFirst
Do
ListBox1.AddItem Trim(RS![Personel])
RS.MoveNext
Loop Until RS.EOF

ya da tüm aktarma yaptıktan sonra verileri okutarak trim işlemine tabi tutabilirsiniz.

Kodlar olmadan bu kadar açıklama yapabildim.

Kolay gelsin

 

[a_self_lion]

For i = 1 To RST.RecordCount Step 1

deger = CStr(RST.Fields(0).Value)

'değer değişkenindeki boşluğu siliyor.
deger = Replace((deger), " ", "")

Ben bu şekilde yaptım hocam sanırım sorun çözüldü sizin bilgilerde extra oldu.

Çok teşekkür ederim.