REM convertit les chaînes pour façonner les données
functiontointeger (str, num)
str = trim (str)
ifstr = "" Ornotisnumeric (str) puis
toInteger = num
autre
toInteger = clng (str)
endire
finition de fin
REM convertit les chaînes en données à double précision
functiontodouble (str)
str = trim (str)
ifstr = "" Ornotisnumeric (str) puis
Todouble = 0,0
autre
Todouble = cdbl (str)
endire
finition de fin
REM convertit les chaînes en données booléennes
fonction toboolean (str)
str = lcase (trim (str))
ifstr = "true" orstr = "t" puis
toboolean = true
elseifisnumeric (str) alors
ifclng (str) <> 0thentoboolean = true
autre
toboolean = faux
endire
finition de fin