#COMPILE EXE "s19_val_str.exe"
' Sample: VAL and STR$ conversion
FUNCTION PBMAIN() AS LONG
    DIM num AS LONG, s AS STRING
    s = "12345"
    num = VAL(s)
    PRINT "VAL('12345') ="; num
    PRINT "STR$(42) = "; STR$(42)
    PRINT "STR$(-42) = "; STR$(-42)
    PRINT "FORMAT$(1234,'00000') = "; FORMAT$(1234, "00000")
    FUNCTION = 0
END FUNCTION
