DVAL$ Example10 Number=98
20 CLEAR SCREEN
30 PRINT "DVAL$ conversion test."
40 PRINT
50 PRINT "Convert";Number;"to... "
60 PRINT "binary: ",DVAL$(Number,2)! to binary
70 PRINT "octal: ",DVAL$(Number,8)! to octal
80 PRINT "base ten: ",DVAL$(Number,10)! to base 10
90 PRINT "hex: ",DVAL$(Number,16)! to hex
100 END
|