REM преобразует строки в формирование данных
functiontointeger (str, num)
str = trim (str)
ifstr = "" Ornotisnumeric (str) then
tointeger = num
еще
tointeger = clng (str)
эндиф
конечная функция
REM преобразует строки в данные с двойным определением
functionToDouble (str)
str = trim (str)
ifstr = "" Ornotisnumeric (str) then
Toduble = 0,0
еще
todouble = cdbl (str)
эндиф
конечная функция
REM преобразует строки в логические данные
Функция Toboolean (STR)
str = lcase (trim (str))
ifstr = "true" orstr = "t", затем
Toboolean = true
Elseifisnumeric (str) тогда
ifclng (str) <> 0thentoboolean = true
еще
Toboolean = false
эндиф
конечная функция