Dim myString() As String = Form_QuotationGuide.TextBox_Z_Achse.Text.Split("-")
 
' Durch Split() wird der String zerlegt und in ein 
' 1-dimensionales Array ('myString') abgelegt.
' Nun kannst Du über den Index der einzelnen 
' Felder direkt auf die Werte zugreifen.
 
' Hier eine Schleife, die diese Felder durch läuft und die einzelnen Werte 
' ausgibt.
For iCount as integer = 0 To myString.length-1 Step 1
      Debug.Print (myString(iCount))
Next