用VAL函数可以把16进制 8进制转换成10进制
比如把16进制的FDFF转换成10进制
print val("&Hfdff")

此程序可用：
INPUT a$
PRINT VAL("&H"+a$)
也可用：
INPUT a$
b=LEN(a$)
FOR i= 1 TO b
b$=MID$(a$,i,1)
IF b$>"9" THEN c=VAL("&H"+B$) ELSE c=VAL(b$)
d=c*a^(b-i)
e=e+d
NEXT i
PRINT e
END

这个程序我试了，不好用！只可算出最低位的值

sum=0
input "input a string:";a$
b$=ucase$(a$)
for i=3 to 0 step -1
k$=mid$(b$,4-i,1)
select case k$
  case "0","1","2","3","4","5","6","7","8","9"
  sum=sum+val(k$)*16-i
  case "A","B","C","D","E","F"
    sum=sum+(asc(k$)-55)*16^i
  end select
next i
print sum
end

此程序可用：
INPUT a$
PRINT VAL("&H"+a$)