相关代码 |
|
可以使用API的ShellExecute函数来实现打开文件。如: Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpszOp As String, _ ByVal lpszFile As String, ByVal lpszParams As String, _ ByVal LpszDir As String, ByVal FsShowCmd As Long) _ As Long ShellExecute 0, "Open", "c:\word\mywor.doc", "", "", SW_SHOW