VB打开文件问题，请大家帮忙看看啊...

Question

我现在是用下面的方法打开文件，这种方法可以直接调用默认的打开方式
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
ShellExecute Me.hwnd, "open", "C:\sdmsdl.JPG", "", "", 1但是当我想打开ShellExecute Me.hwnd, "open", "C:\MSSCCPRJ.SCC", "", "", 1 时，就没有反应了。vb如何能像windows里的双击那样,没有默认的打开方式时，能够跳出下图这个选择程序才用户选。请高手帮帮忙，分不够可以再加的，只要问题能够解决

Answer 1

没那么复杂：
 Shell "explorer C:\MSSCCPRJ.SCC", vbNormalFocus

Answer 2

那种文件本来就没有关联的程序。
你在打开 VB 工程，应该打开扩展名是 .vbp 的文件。

Answer 3

上面只是一个例子而已我想实现的是：
vb打开文件时，若没有关联的程序，就弹出"windows 不能打开此文件"的窗口（如上图所示）可以让用户自己选择打开的程序

Answer 4

Shell "rundll32.exe shell32.dll,OpenAs_RunDLL c:\MSSCCPRJ.SCC", vbNormalFocus