Delete

Top  Previous  Next

sub Delete(ByRef sSource As String, iStartPos As Integer, iLength As Integer)

 

Löscht einen Substring mit iLength Zeichen aus sSource, beginnend ab Position iStartPos. Das erste Zeichen in sSource hat den Index 1.

 

Falls iStartPos größer als die Länge von sSource oder kleiner als 1 ist, dann werden keine Zeichen gelöscht.

 

Falls iLength mehr als ab iStartPos verfügbare Zeichen angibt, dann werden alle Zeichen ab iStartPos gelöscht. Falls iLength kleiner oder gleich 0 ist, dann werden keine Zeichen gelöscht.

 

Parameter

 

sSource ... String-Ausdruck, aus dem Zeichen gelöscht werden.
iStartPos ... Integer-Ausdruck. Anfangsposition der zu löschenden Zeichen.
iLength ... Integer-Ausdruck. Anzahl der zu löschenden Zeichen.

 

Beispiel:

Dim s

 

= "This is a text"

Delete(s, 6, 5)

' returns s = "This text"