请问VB怎么打开一个文件

Question

我想用VB的命令按钮直接打开一个WORD文档，就像在VB里设一个快捷方式一样。

Answer 1

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:\User.doc", vbNullString, vbNullString, SW_SHOWEnd Sub

Answer 2

Private Sub Command1_Click()
    Shell "C:\Program Files\Microsoft Office\Office\WINWORD.EXE c:\temp.doc", vbMaximizedFocus
End SubC:\Program Files\Microsoft Office\Office 是office的安装路径，请选择自己对应的路径