Dies ist der 1. Teil meiner Virtual Basic Anleitungen:
Visual Basic Stringfunktione
Die verschiedenen Stringfunktionen kommen zunächst etwas unscheinbar daher und werden auch meist unterschätzt, doch die Kenntnis der verschiedenen Funktionen und Ihrer Anwendungsgebiete spart mit unter erheblich Zeit und vereinfacht die Programmierung um Längen.
Left(string, n)
Die Funktion Left trennt von einem string die Anzahl n Zeichen, gezählt vom ersten Linken Zeichen, ab und gibt Sie als String zurück. Z.B.:
Die Funktion Right trennt von einem string die Anzahl n Zeichen, gezählt vom ersten Rechten Zeichen, ab und gibt Sie als String zurück. Z.B.:
Die Funktion Mid trennt ausgehend von der Position n im einem Text x Zeichen in der Richtung von Links nach Rechts aus dem string heraus und gibt sie als String zurück. Wird x nicht angegeben werden allen Zeichen bis zum Ende des String zurück geben. Z.B.:
Die Funktion Chr wandelt einen Zeichencode x in einen String der Länge 1 um und gibt diesen Zurück. Dabei entspricht der Zeichencode dem Ascii-Zeichensatz. Z.B.:
Die Funktion Asc wandelt einen String x in einen Zeichencode um dieser entspricht dem Ascii-Zeichensatz. Z.B.:
knollo14
Visual Basic Stringfunktione
Die verschiedenen Stringfunktionen kommen zunächst etwas unscheinbar daher und werden auch meist unterschätzt, doch die Kenntnis der verschiedenen Funktionen und Ihrer Anwendungsgebiete spart mit unter erheblich Zeit und vereinfacht die Programmierung um Längen.
Left(string, n)
Die Funktion Left trennt von einem string die Anzahl n Zeichen, gezählt vom ersten Linken Zeichen, ab und gibt Sie als String zurück. Z.B.:
Right(string, n)Quote:
Dim Text As String
Dim Ergebnis As String
Text = "Das ist eine Test Text!"
Ergebnis = Left(Text, 7)
Debug.Print Ergebnis
’Der zurück gegebene String lautet „Das ist“.
Die Funktion Right trennt von einem string die Anzahl n Zeichen, gezählt vom ersten Rechten Zeichen, ab und gibt Sie als String zurück. Z.B.:
Mid(string, n, x)Quote:
Dim Text As String
Dim Ergebnis As String
Text = "Die Sonne schein den ganzen Tag!"
Ergebnis = Right(Text, 7)
Debug.Print Ergebnis
’Der zurück gegebene String lautet „en Tag!“.
Die Funktion Mid trennt ausgehend von der Position n im einem Text x Zeichen in der Richtung von Links nach Rechts aus dem string heraus und gibt sie als String zurück. Wird x nicht angegeben werden allen Zeichen bis zum Ende des String zurück geben. Z.B.:
Chr(x)Quote:
Dim Text As String
Dim Ergebnis As String
Text = "Wieder so ein Beispiel!"
Ergebnis = Mid(Text, 3, 7)
Debug.Print Ergebnis
’Der zurück gegebene String lautet „eder so“.
Die Funktion Chr wandelt einen Zeichencode x in einen String der Länge 1 um und gibt diesen Zurück. Dabei entspricht der Zeichencode dem Ascii-Zeichensatz. Z.B.:
Asc(x)Quote:
Debug.Print Chr(80)
’Der zurück gegebene String lautet „P“.
Die Funktion Asc wandelt einen String x in einen Zeichencode um dieser entspricht dem Ascii-Zeichensatz. Z.B.:
GraazQuote:
Debug.Print Asc(“P”)
’Der zurück gegebene Zeichencode lautet „80“.
knollo14
