VB6读取文本,并将每行固定的字段赋给变量

    dim nFile as Integer, strTmp as String
    dim arTmp() as String
    nFile = FreeFile
    Open 文本文件全路径名 For Input As #nFile
    Do While Not EOF(nFile)
       Line Input #nFile, strTmp
       arTmp=Split(strTmp,分隔符)  '不知道你分隔符是空格还是TAB?
       分析该数组(arTmp(0)对应第一个字段,依次类推)
    Loop
    Close #nFile

阅读更多
文章标签: vb integer string input
想对作者说点什么? 我来说一句

Zhang yuqin-ABAP运算.ppt

2009年03月11日 310KB 下载

没有更多推荐了,返回首页

不良信息举报

VB6读取文本,并将每行固定的字段赋给变量

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭