txt文件里内容:“00 00 00 00 00 00 00 00 00 01 00 01 00 00 00 02 00 02 00 00 00 03 00 03 00 00 00 04 00 00 00 00 00 05 00 00 00 00 00 06 00 00 00 00 00 07 00 07 00 00 00 08 00 08 00 00 00 09 00 09 00 00 00 0A 00 00 00 00 00 0B 00 00 00 00 00 0C 00 0C 00 00 00 11 00 11 00 ”
中间以""分割,如何一次读一个数据,一直读到最后?

解决方案 »

  1.   

    dim a() as string
    dim b as string
    dim i as long
    b=“00 00 00 00 00 00 00 00 00 01 00 01 00 00 00 02 00 02 00 00 00 03 00 03 00 00 00 04 00 00 00 00 00 05 00 00 00 00 00 06 00 00 00 00 00 07 00 07 00 00 00 08 00 08 00 00 00 09 00 09 00 00 00 0A 00 00 00 00 00 0B 00 00 00 00 00 0C 00 0C 00 00 00 11 00 11 00 ”
    a=split(b)
    '好了,数组a里就是一个一个的数据了。
    '看一下:
    for i = lbound(a) to Ubound(a)
        print a(i)
    next
      

  2.   

    同意 YaDa,如果一次读一个数据速度会慢