在VB中怎么调用一本文本文件？当点击字体时，打开文本文件？

2024-12-26 07:45:03

推荐回答（1个）

回答1：

在窗体上画一个label
在代码窗口里写入
Private Sub Label1_Click()
Shell "notepad.exe d:\1.txt", vbNormalFocus
End Sub
这里要解释一下shell 函数的用法，它的第一个参数是一个字符串，用来表示要打开的可执行程序路径，这里我们选择了notepad.exe,其实是略写了C:\WINDOWS\，因为不写路径的话，vb会在默认路径C:\WINDOWS里找notepad.exe 这个程序的。第一个参数的第二部分是要打开的文件名及其路径，这个应该不用解释了吧。第二个参数是表示打开的可执行程序以什么形式的窗口出现，分为：最大化聚焦，最小化聚焦，最小化不聚焦，正常聚焦，正常不聚焦这五种。
以上代码通过测试，只需修改文本文件路径即可使用。我是vb变程团成员，谢谢信任。