文本文件中现有多行格式相同的数据:如:12345 李刚 男 28。。等等,每行格式相同,用VB怎么实现将其读入到变量xuhao()、xingming()、xingbie()、nianling()中,请高手指教。

解决方案 »

  1.   

    是否有分隔符,如果有分隔符,可以先得到分隔符的位置,用instr()函数
    用substring函数得到每种字段的值
    一次只能读一行,用ReadLine函数,这是指引用file system object,DLL文件名是scrrun.dll如果直接用VBA函数也可以做到不过麻烦一点,我很少用
      

  2.   

    open 文件 for input as #1
       inpue #1, xuhao(),xingming(),xingbie(),nianling()
    close #1
    就行了,不要用line input
      

  3.   

    open 文件 for input as #1
       inpue #1, xuhao(),xingming(),xingbie(),nianling()
    close #1不过我比较喜欢filesystemobject