(15/09/2020, 21:38)berduş yazdı: text oluştur butonunda yer

dosyam_AccessTR.writeline (rs_kural.Fields("m1") & rs_kural.Fields("m2") & rs_kural.Fields("m3"))

yukardaki kod yerine aşağıdaki kodu dener misiniz?

 Aln2 = Left(Trim(rs_kural.Fields("m2")), 25)

 Aln2 = IIf(Len(Aln2) < 25, Aln2 & Space(25 - Len(Aln2)), Aln2)

dosyam_AccessTR.writeline (rs_kural.Fields("m1") & Aln2 & rs_kural.Fields("m3"))

 hocam ellerinize sağlık 
konuyu cevaplanmışlara taşıyabiliriz.


txt dosyasında veriler karekter sayı ve sırasına göre oluşuyor.
ilginize teşekkür ederim.elinize sağlık

ilginiz ve hızlı cevabınız için teşekkür ederim.