VB技巧问答10000例,是一个教程

				可以使用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