Skip to main content

AccessTr.neT M.

iki vbCrLf karakteri arasındaki veriiyi almak

Konu

Çözüldü #1
iyi günler
içinde vbCrLf karakterleri olan metinlerim var
yani metinde birden fazla satır var
bana 7.satırdaki bilgi lazım
metin1 şu şekilde

şlkşlkşlkşlk
şişlişlişli
opoıpoıp
pğpğoğpoğ
lğplğplğplğ
jljljlkjlkjlk
METİN YILDIRIM
jlkjlkjşlklljiş

bu sekiz satır meti1 i oluşturuyor
bundan yedinci satırı alıp başka değişkene aktaracağım
malum olduğu üzere "METİN YILDIRIM" sabit değil
her kayıtta değişiyor oyüzden metindeki karakter sayısına göre almam mümkün değil
her kaydın tek ortak yanı bu isimlerin hep 7. satırda olması
bende bu problemi metindeki
6.vbCrLf ile 7.vbCrLf karakterleri arasındaki veriyi çekerek çözmek istiyorum
bunu nasıl yapabilirim
örnek eklenecek bir soru olduğunu düşünmediğim için örnek eklemedim
yardımlarınız için teşekkürler

@benbendedeilem
Cevapla
Çözüldü #2
burada anlatılmış ama nasıl uyarlamalıyım

https://accesstr.net/showthread.php?tid=...%C4%B0NSTR

@benbendedeilem
Cevapla
...........
Çözüldü #3

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
Dim Veri As Variant
Dim Dizi As Variant

Veri = Replace(Me.Metin0, vbCrLf, ", ")
Dizi = Split(Veri, ",")

For say = LBound(Dizi) To UBound(Dizi)
    Me.Liste7 = ""
    Me.Liste7.AddItem Dizi(say)
Next
    Me.Metin5 = Liste7.Column(0, 6)

.rar bzhmt.rar (Dosya Boyutu: 26,83 KB | İndirme Sayısı: 8)
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
Çözüldü #4
Son Düzenleme: 07/02/2013, 16:00, Düzenleyen: accessman.
çok teşekkürler

teşekkürler
2003 olarak da ekleyebilirmisiniz

@benbendedeilem
Cevapla
...........
Çözüldü #5
Son Düzenleme: 07/02/2013, 16:26, Düzenleyen: accessman.
ben şöyle halletmeye çalıştım
istediğimi yapıyor ama biraz amatörce oldu

Kod:
adres = Left(adres, Len(adres) - (Len(adres) - InStrRev(adres, vbCrLf)))
adres = Right(adres, Len(adres) - InStrRev(adres, vbCrLf) - 9)


ilk satırla sonrakileri
ikinci satırla öncekileri atınca aradakini buluyor
daha pratik bir kod mutlaka vardır

@benbendedeilem
Cevapla
Çözüldü #6
.rar bzhmt.rar (Dosya Boyutu: 19,8 KB | İndirme Sayısı: 7)

"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
...........

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task