Split fonksiyonunu kullanabilirsiniz.
Örneğin:
Yazi="67.77.347.32.3"
Split(yazi,".")(0) => 67 rakamını döndürür
Burada Split fonksiyonu metni belirtilen kritere göre bölüp bir diziye sokar.
Dizinin ilk endeksi 0 ve dizideki ilk veriyi döndürür.
İstenirse bir döngü bile oluşturulur:
Kod:
Dim Dizi As Variant
Dizi = Split(yazi, ".")
For say = LBound(Dizi) To UBound(Dizi)
MsgBox Dizi(say)
Next