Question

关于怎样用VB打开一个已有的txt文件

我将已有内容存在了记事本里，变成了txt文件，现在我想通过点击command1后打开这个文本文档。
我写了private sub command1_click()
dim i%
i = shell (app.path +"\1.txt",1)
end sub
系统却报错说无效过程调用。
我应该怎么改正代码？

Answer 1

shell 的使用需要指定某一个应用程序，你的代码就是这个问题改成这样就行了

Private Sub command1_click()
   Dim i%
   i = Shell("notepad.exe " + App.Path + "\1.txt", 1)
End Sub

追问

我这样写了还是说文件未找到啊T^T

追答

"notepad.exe "你少了一个空格 这个空格的意义在于把应用程序和文件路径区分开

Answer 2

Private Sub command1_click()

Shell "Notepad """ & app.path +"\1.txt""" , vbMaximizedFocus
End Sub

追问

我是想直接打开记事本，而不是把文档导入窗体的文本框

追答

Private Sub command1_click()
Shell "Notepad """ & app.path +"\1.txt""" , vbMaximizedFocus
End Sub
就是用记事打开啊。。。

追问

哈哈~解决了~太谢谢你了~

追答

不客气，解决了就行了。