Adındanda anlaşılcağı gibi bölmek için kullanılır
kullanımı oldukca basittir
Split(expression[, delimiter[, count[, compare]]])
ifade , sınırlayıcı ,saymak , karşılaştırmak
örnek vermem gerekirse
textboxsumuzda #www.realses.com#mustafa#yılmaz diye bir yazımız olsun
ben genelde farklı farklı textlere yazmaktansa 1 text'e yazıp yazıyı parcalıyorum
Dim veri
veri = Split(Text1.Text, "#")
List1.AddItem veri(1)
böyle birşey yaptıgımızda listeye http://www.realses.com eklendigini görecegiz ilk sınırlıyıcımızı buluyoruz oda# ve sonraki sınırlıyıcımıza kadar olan yerdeki yazıyı ordan kesip aldık
veri(2) deseydik bu sefer mustafayı alıcaktı 2ci sınırlayıcımızdan başlıyor sonraki sınırlıyıcımız arasındaki yazıyı bize veriyor 
şöyle birşeyde yapabiliriz parcalar listeye ekleriz
Dim a, b
a = Split(Text1.Text, "#")
For b = 0 To 3
List1.AddItem a(b)
Next
kullanımı oldukca basittir
Split(expression[, delimiter[, count[, compare]]])
ifade , sınırlayıcı ,saymak , karşılaştırmak
örnek vermem gerekirse
textboxsumuzda #www.realses.com#mustafa#yılmaz diye bir yazımız olsun
ben genelde farklı farklı textlere yazmaktansa 1 text'e yazıp yazıyı parcalıyorum
Dim veri
veri = Split(Text1.Text, "#")
List1.AddItem veri(1)
böyle birşey yaptıgımızda listeye http://www.realses.com eklendigini görecegiz ilk sınırlıyıcımızı buluyoruz oda# ve sonraki sınırlıyıcımıza kadar olan yerdeki yazıyı ordan kesip aldık


şöyle birşeyde yapabiliriz parcalar listeye ekleriz

Dim a, b
a = Split(Text1.Text, "#")
For b = 0 To 3
List1.AddItem a(b)
Next
0 yorum:
Yorum Gönder