Insert

Top  Previous  Next

sub Insert(sValue As String, ByRef sSource As String, iPosition As Integer)

 

Fügt sValue ab Position iPosition in den String sSource ein. Das erste Zeichen in sSource hat den Index 1.

 

Diese Funktion ist äquivalent zu:

sSource = Left(sSource, iPosition-1) + sValue + Mid(sSource, iPosition, MaxInt)

 

Parameter

 

sValue ... String-Ausdruck, der eingefügt werden soll.
sSource ... String-Ausdruck, in den eingefügt werden soll.
iPosition ... Position, ab der sValue eingefügt werden soll.

 

Beispiel:

Dim s

 

= "This text"

Insert("is a ", s, 6)

' returns s = "This is a text"