备注字段=备注字段+HEX(FING(I))
改为
备注字段=备注字段+format(HEX(FING(I)),"00"

解决方案 »

  1.   

    for i=0 to 399
       sTemp=hex(fing(i))
       if len(stemp)=1 then
           备注字段=备注字段+"0" +HEX(FING(I))
       else
           备注字段=备注字段+HEX(FING(I))
       endif
    next i
    因为如果fing(i)小于16的话,hex()返回的长度只有一位。
      

  2.   

    不好意思有点错,应该是改为
    备注字段=备注字段+format(HEX(FING(I)),"00")因为HEX转换成的16进制字符串,不一定时两位
      

  3.   

    hex()返回的是string类型,format语句好像不可以。