Auch in den .net-versionen von VB muss das leere Array initialisiert werden, siehe hier:
http://msdn.microsoft.com/de-de/libr...=vs.90%29.aspx
Zitat:
„Leere Arrays. Die Obergrenze einer Arraydimension kann mit -1 deklariert werden. Dies bedeutet, dass das Array leer, jedoch nicht Nothing ist, eine Unterscheidung, die bei bestimmten Common Language Runtime-Funktionen wichtig ist. Visual Basic-Code kann auf ein solches Array jedoch nicht zugreifen. Wenn Sie es dennoch versuchen, tritt während der Ausführung ein IndexOutOfRangeException-Fehler auf. Weitere Informationen finden Sie unter Gewusst wie: Erstellen eines Arrays ohne Elemente.“

Da keine Grenzen genannt sind und das leere Array nicht initialisiert wurde, kommt beim ersten Aufruf in der Zeile
Terminal.AppendText(TextArray(1))
die Exception.
Es ist doch kein Aufwand, die Länge des Buffers (in VB6: Bufferlaenge = Len(Buffer)) zu bestimmen und in der Zeile vorher

Dim TextArray( Bufferlaenge ) As String = Split(Buffer, ",")
zu dimensionieren.
Zumindest kann man es ja mal ausprobieren.

Gruß, Günter49