REMETWANNTE STADEN in die Gestaltung von Daten
FunktionsTointEger (str, num)
STR = Trim (str)
ifstr = "" ornotisnumeric (str) Dann
tinteger = num
anders
tinteger = clng (str)
Endif
Endfunktion
REM-REMVERTIERT STAGE in doppelte Präzisionsdaten
functionTodouble (str)
STR = Trim (str)
ifstr = "" ornotisnumeric (str) Dann
Todouble = 0,0
anders
TODOUBLE = CDBL (STR)
Endif
Endfunktion
REM -REM -Saiten in Boolesche Daten konvertiert
Funktion toBoolean (STR)
STR = Lase (Trim (Str))
ifstr = "true" orstr = "t" dann
TOBOOLEAN = TRUE
elseifisnumeric (str) Dann
ifclng (str) <> 0thentoboolean = true
anders
TOBOOLEAN = false
Endif
Endfunktion