Question

我使用的非Microsoft应用程序支持VBA。我正在尝试将文件解析为数组，遵循我找到的here：

示例代码

Sub parseFile()

    Dim file As String
    file="c:/Users/Me/Documents/test.csv"

    Open file For Input As #1

    Dim data(2,5) As String '2,5 dummy values for test      
    Dim Line As Integer
    Line=0

    Do Until EOF(1)
       Line Input #1, LineFromFile
       LineItems = Split(LineFromFile, ",")
       Dim field As Integer
       For field = 0 To 5
        data(Line,field)=LineItems(field)
       Next field
    Loop

    Close #1
End Sub

我得到＆＃34;无效指令＆＃34;为Line Input #1, LineFromFile。

这是特定于Excel的功能吗？我可以使用这个库来使用吗？我应该以其他方式接近这个吗？

Answer 1

尝试评论这两行

Dim Line As Integer
Line = 0

我认为你是shadowing Line Input Statement的Line部分。基本上，您被声明为一个与系统函数同名的局部变量，并且编译器变得混乱。

文件读取语句不是特定于Excel的，它们是核心语言的一部分，并且在没有引用的情况下可用。他们老实，笨重，并且在很大程度上被FileSystemObject取代，需要参考。

所需的VBA参考使用＆＃34;线路输入＆＃34;？

1 个答案: