Mid

Top  Previous  Next

Sub Mid($s As String, $startPos As Integer, $length As Integer) As String
 
' -or-
 
Sub Copy($s As String, $startPos As Integer, $length As Integer) As String

 

Mid liefert einen Substring mit $length Zeichen, beginnend ab Position $startPos. Das erste Zeichen in $s hat den Index 1.

 

Falls $startPos größer als die Länge von $s ist, gibt Mid einen leeren String zurück.

 

Falls $length mehr Zeichen (als in sSource verfügbar) angibt, werden alle Zeichen ab Position $startPos bis zum Ende von $s zurückgegeben.

 

Parameter

 

$s ... String-Ausdruck, aus dem Zeichen zurückgegeben werden.
$startPos ... Integer-Ausdruck. Anfangsposition der zurückzugebenden Zeichen.
$length ... Integer-Ausdruck. Anzahl der zurückzugebenden Zeichen.

 

Beispiel:

Dim $s, $s2

 

$s = "This is a text"

$s2 = Mid($s, 6, 2)

' returns $s2 = "is"