请问有什么方法可以用系统默认的程序打开一个文件？

[seemon]

请问有什么方法可以用系统默认的程序打开一个文件？比如用word打开.doc的文档，用excel打开.xls的文档，
我想通过读注册表，然后用shell可以实现，有没有简单的方法？

[iwillgo2]

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
Const SW_SHOWNORMAL = 1
Private Sub Form_Load()
ShellExecute Me.hwnd, "Open", "c:\1.txt", vbNullString, vbnulstring, SW_SHOWNORMAL
End Sub

[ityaa]

同上