VB自动打开文件

来源：百度知道 编辑：UC知道 时间：2024/06/21 17:19:07
比如设置一个绝对路径C:/txt.txt

如何制作一个按钮能够让VB自动找到路径打开这个文本

我需要一个源码参考。
Open C:/txt.txt For Input As #1
" : "这个符号提示 ：缺少 AS

Private Sub Command1_Click()
Open C:/txt.txt For Input As #1
Dim Lstr As String
Do While Not EOF(1)
Line Input #1, Lstr
text1 = text1 & Lstr & vbCrLf
Loop
Close #1
End Sub

改成 Open "C:/txt.txt" For Input As #1

Open C:/txt.txt For Input As #1 你可以自己改路径