Gibt’s in VB folgende Routinen, wie in Delphi ?
Delete (Zeichen aus einem String löschen)
Pos (Position eines Zeichens oder String)
Copy (Strings aneinanderhängen)
Insert (Strings ineinenhängen)
thx, Roger
Gibt’s in VB folgende Routinen, wie in Delphi ?
Delete (Zeichen aus einem String löschen)
Pos (Position eines Zeichens oder String)
Copy (Strings aneinanderhängen)
Insert (Strings ineinenhängen)
thx, Roger
… in VB 6.0
Hi Roger,
weiter unten sind kleine Beispiele.
greets from MichL (Vienna)
Dim strBuf As String
strBuf = „VB-Programmierunk, gibt’s was schöneres?!?!“
'Zeichen ersetzen
strBuf = Replace(strBuf, „k“, „g“)
Debug.Print strBuf
'Zeichen aus String löschen
strBuf = Replace(strBuf, „VB-“, „“)
Debug.Print strBuf
'Zeichen aneinander hängen (kopieren?!?!)
strBuf = strBuf & " (einfach angehängt)"
Debug.Print strBuf
sorry … noch was vergessen
'Position eines Zeichens
Debug.Print InStr(strBuf, „w“)
hab auch noch was vergessen, wie sieht’s mit einer function aus, die die länge des gesamten strings zurück gibt ?
Length() oder sowas
und hier ist es:
Debug.Print Len(strBuf)
greets from MichL (Vienna)
ok, cool
nun noch ein letztes kleines Detail
Mit „kopieren“ (copy) meinte ich zeichen auf einem string zurückliefern. Z.b.
HelpStr = „Roger Bieri“
HelpStr = Copy(HelpStr, 1, 5) ’ = „Roger“
also, 5 Zeichen, ab dem 1. Zeichen kopieren
so schnell kann’s gehen:
HelpStr = „Roger Bieri“
HelpStr = Mid$(HelpStr, 1, 5)
Debug.Print HelpStr
greets from MichL (Vienna)
merci
OK, ich danke dir für die schnellen Antworten. Gehörst wohl auch zu den Glücklichen mit ner Standleitung im Büro
In Delphi hätt ich das ja schnell in 30 sekunden gemacht, aber VB ist halt ned so meine Stärke, benutze erst seit Montag und werde mich wohl noch 2-3 monate beruflich damit auseinandersetzen müssen, hehe
greets, Roger
… keine Ursache … Viel Spaß noch mit VB!!!
greets from MichL (Vienna)
PS: Standleitung ist wirklich was feines!!!