' String erstellen
Dim a as string, i() as string
a = "Test | Hallo du"
 
' Und jetzt nehmen wir ihn auseinander mit der Split Function
 
i = Split (a, " | ", 1)
 
' (a) ist der Text der auseinander genommen werden soll
' (" | ") ist der schnttPunkt
' (1) sagt wieviel mal der Text auseinandergenommen werden soll
 
 
' Und jetzt soll er den 2ten Teil als Warnung rausbringen (also "Hallo du")
msgbox i(2)

-.-