(資料圖片僅供參考)

1、dim x as integer,y as string,c(100) as integer,q as string,w as integer,s as integery=str(inputbox"請輸入16進(jìn)制數(shù)")x=len(trim(y))for i= 1 to x q=mid(y,i,1) if q<="9"then s=s+val(q)*(16^(i-1)) else s=s+(asc(q)-55)*(16^(i-1)) end ifnext iy=trim(str(s))x=len(y)for i= x to 1 step -1 c(i)=val(mid(y,i,1))next iexd。

本文分享完畢，希望對大家有所幫助。