[已解决]关于VBA中OPEN后,如何读取文件内容?

kob0591

在VBA中.

Open "TESTFILE" For Input As #1

如何可以查看到文件#1的内容呢?只能一条条记录的GET?

最佳答案

月排行榜 / 总排行榜

amulee

2010-11-30 13:06

Line Input # 语句示例

本示例使用 Line Input # 语句从顺序文件中读入一行数据，并将该行数据赋予一个变量。本示例假设 TESTFILE 文件内含数行文本数据。

Dim TextLine
Open "TESTFILE" For Input As #1    ' 打开文件。
Do While Not EOF(1)    ' 循环至文件尾。
    Line Input #1, TextLine    ' 读入一行数据并将其赋予某变量。
    Debug.Print TextLine    ' 在立即窗口中显示数据。
Loop
Close #1    ' 关闭文件。

跳转到最佳答案楼层

amulee

Line Input # 语句示例

本示例使用 Line Input # 语句从顺序文件中读入一行数据，并将该行数据赋予一个变量。本示例假设 TESTFILE 文件内含数行文本数据。

Dim TextLine
Open "TESTFILE" For Input As #1    ' 打开文件。
Do While Not EOF(1)    ' 循环至文件尾。
    Line Input #1, TextLine    ' 读入一行数据并将其赋予某变量。
    Debug.Print TextLine    ' 在立即窗口中显示数据。
Loop
Close #1    ' 关闭文件。

wayy

QUOTE:

以下是引用amulee在2010-11-30 13:06:00的发言：

Line Input # 语句示例

本示例使用 Line Input # 语句从顺序文件中读入一行数据，并将该行数据赋予一个变量。本示例假设 TESTFILE 文件内含数行文本数据。

Dim TextLine
Open "TESTFILE" For Input As #1    ' 打开文件。
Do While Not EOF(1)    ' 循环至文件尾。
    Line Input #1, TextLine    ' 读入一行数据并将其赋予某变量。
    Debug.Print TextLine    ' 在立即窗口中显示数据。
LoopClose #1    ' 关闭文件。

学习了。

simonguo

学习下