Split Function Nedir ? Nasıl Kullanılır?

Merhabalar..Gecenin bi vakti aklıma gelip sizlerle paylaşmak istediğim bir fonksiyon var.Kimin ne işine yarar bilmiyorum fakat mutlaka bi yerde işinize yarayacaktır;)
Neden kullanırız? text kutusu yada bir txt belgesinin içindekiler parçalamak istersek eğer bu fonksiyonu kullanabiliriz..
Text kutusu içerisinde split fonksiyonunun kullanımı;

Dim str() As String
str = TextBox1.Text.Split(",") 'Her virgülde ayır demek istedik ;)
'eğer text içinde her boşlukta bi ayrım yapmak isterseniz
'bu şekilde kullanabilirsiniz
'str = TextBox1.Text.Split(" ")
'ya da özel bir karakter belirterek de kullanabilirsiniz.
'str = TextBox1.Text.Split("herhangi bir karakter")

For i As Integer = 0 To str.Length - 1 Step 1
      If str(i) <> "" Then
          MsgBox(str(i))
      End If
Next

Dim Storage As String = "K:\2aN\splitfnc.txt"


If (txtProduct.Text = "KaaN") Or (txtProduct.Text = "kaan") Then

If System.IO.File.Exists(Storage) = True Then

Dim objStreamReader As System.IO.StreamReader
Dim strLine As String
objStreamReader = New System.IO.StreamReader("K:\2aN\splitfnc.txt")
strLine = objStreamReader.ReadLine
Do While Not strLine Is Nothing

msgbox(strLine)

ya da bir dizi(array) içinde de bunu yapabiliriz şöyleki;

dim str_ayrac() as string
str_ayrac = strLine.Split(" ")'boşluk karakterini ayırıyoruz

for dim i as integer = 0 to str_SplitArr.Length step 1
      Msgbox(strSplitArr(i))
Next

Ayak üstü hazırlanmış bi kod olup denemek için yeterince uykusuz ve yorgunum..Değişiklik yada bi sıkıntıda buralarda olurum..Herkese ii çalışmalar ii geceler;)