function f_str2num(string) if isnumeric(string)=true then f_str2num=clng(string) else f_str2num=0 end if end function