Befehlsreferenz - Umwandlungsfunktionen: Val-Funktion
VB-Versionen: VB4 | VB5 | VB6
Beschreibung:
Gibt den numerischen Wert in einer Zeichenfolge am Anfang enthaltener Zahlen zurück (Datentyp Double).
Syntax:
Val (Zeichenfolge)
Parameter:
Zeichenfolge | (Variant / String) beliebiger gültiger Zeichenfolgenausdruck |
Beispiel:
Private Sub Command1_Click() Dim Wert1 Dim Wert2 Dim Wert3 Dim Wert4 Wert1 = Val("936184") ' Liefert 936184 Wert2 = Val(" 93 61 84") ' Liefert 936184, Leerzeichen werden eliminiert Wert3 = Val("30 Rosen") ' Liefert 30, bis zum ersten nicht als Zahl interpretierbaren ' Zeichen wird gelesen Wert4 = Val("Nummer 10") ' Liefert 0, da die Zeichenfolge nicht mit einer Zahl beginnt MsgBox Wert1 & vbCrLf & Wert2 & vbCrLf & Wert3 & vbCrLf & Wert4 End Sub