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

最新推荐文章于 2024-09-23 15:59:52 发布

原创最新推荐文章于 2024-09-23 15:59:52 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#vb #integer #string #input

本文介绍了一种使用Visual Basic Script (VBS) 从文本文件中读取数据并按分隔符拆分的方法。具体步骤包括打开文件、逐行读取内容，并利用Split函数将每行数据分割成数组以便进一步处理。

    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