怎么用vb打开文件？

[ttoc]

麻烦问一下，vb中能直接打开文件吗？就比如，doc就用word打开，.pdf就用Acrobat Reader打开，.txt就用“记事本”打开，如果要是用shell的话，前边是不是还要加应用程序名呀？并且还要判断，有没有什么办法能让vb用系统默认关联的程序直接打开，就象在我的电脑中双击或是在“开始”-->“运行”中写入的字符串一样能直接执行？？

[海牛]

Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Form_Load()
ShellExecute Me.hwnd, "open", "C:\111.txt", vbNullString, vbNullString, 1
End Sub

[chenyu5188]

同意楼上方法

[wumy_ld]

如何根据文件扩展名得到文件关联所对应的应用程序路径，例如，根据扩展名DOC得到Word所在的路径，根据扩展名XLS得到Excel所在的路径

以doc为例
1）再HKEY_CLASSES_ROOT中查找扩展名.doc找到HKEY_CLASSES_ROOT\.doc,取其默认值Word.Document.8

2）再HKEY_CLASSES_ROOT中查找Word.Document.8
找到HKEY_CLASSES_ROOT\Word.Document.8\shell\Open\command\，其默认值就是程序路径

[啊维]

同意楼上的方法

[ttoc]

谢谢兄弟们的帮忙~~