Code-Beispiel
StringEx
Lizenz: | Erster Autor: | Letzte Bearbeitung: |
k. A. | Eternal_Pain | 16.08.2007 |
Syntax Ausgabe[$] = StringEx (Ausdruck[$],Anzahl)
Typ: Funktion
Kategorie: Stringmanipulation
STRINGEX gibt eine Zeichenkette aus "Anzahl" Zeichen aus.
Jedes Zeichen dieser Kette ist 'Ausdruck[$]' bzw. CHR('code').
Das Dollarzeichen ($) als Suffix ist optional.
Siehe auch STRING (Funktion)
Declare Function StringEx(Byval ExpEx As String, CountEx As Uinteger) As String
'-----------------------------------------------------------------------------'
Function StringEx (Byval ExpEx As String, Byval CountEx As Uinteger) As String
If CountEx=0 Or Len(ExpEx)=0 Then Return ""
Dim Buffer As String
For l As Integer= 1 To CountEx
Buffer += ExpEx
Next l
Return Buffer
End Function
'-----------------------------------------------------------------------------'
Zusätzliche Informationen und Funktionen | |||||||
---|---|---|---|---|---|---|---|
|
|