51问答网 > 如何用VB打开一个任意路径下的文件，比如WORD，EXCEL。最好有完整代码。

如何用VB打开一个任意路径下的文件，比如WORD，EXCEL。最好有完整代码。

2024-12-27 14:41:06

推荐回答（1个）

回答1：

Public 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

Function OpenURL(ByVal url As String)
Dim lngReturn As Long
lngReturn = ShellExecute(0, "open", url, "", Mid(URL, 1, InStrRev(url, "\") - 1), 1)
End Function