Excel_VBA 逐行读取文件

最新推荐文章于 2024-01-07 01:31:36 发布

iteye_11020

最新推荐文章于 2024-01-07 01:31:36 发布

阅读量1k

点赞数

CC 4.0 BY-SA版权

分类专栏： Excel_VBA

本文链接：https://blog.youkuaiyun.com/iteye_11020/article/details/82412876

Excel_VBA 专栏收录该内容

30 篇文章

订阅专栏

本文将指导您如何使用VBA（Visual Basic for Applications）语言，通过逐行读取Autoexec.bat文件来获取并处理其中的内容。包括详细步骤和实例演示。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

逐行读取文件
使用下面的语句来逐行读取Autoexec.bat或者其它任何顺序文件里的内容：
Line Input #filenumber, variableName
#filenumber是用Open语句打开文件时使用的数字，variableName是个String或者Variant变量，用来储存读取的行。
Line Input #语句仅读取一开启顺序文件里的一行并且储存在一变量里。记住，Line Input # 语句一次读取顺序文件里的一个字符，直到它遇到回车字符（Chr(13)）或者回车-换行字符（Chr(13) & Chr(10)）。这些字符（回车，换行）在读取过程中返回的文本里是会忽略掉的。
接下来的过程ReadMe示范如何使用Open和Line Input #语句逐行读取Autoexec.bat文件的内容。试试用同样的方法来读取其它顺序文件。
Sub ReadMe()
Dim rLine As String
Dim i As Integer ' line number
i = 1
Open "C:\Autoexec.bat" For Input As #1

' stay inside the loop until the end of file is reached

Do While Not EOF(1)
Line Input #1, rLine

MsgBox "Line " & i & " in Autoexec.bat reads: " _
& Chr(13) & Chr(13) & rLine

i = i + 1
Loop

MsgBox i & " lines were read."
Close #1
End Sub