怎样才能在FileListBox通过双击一个文件，然后调用相应的程序打开它（在线等）

Question

同上

Answer 1

通过Windows命令呀！
如打开一个wchsoft.bmp
在程序中通过WINEXEC调用：start wchsoft.bmp
不信你到DOS（非纯DOS）下试一试

Answer 2

Private Const SW_SHOWNORMAL = 1Private 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
Private Declare Function GetDesktopWindow Lib "user32" () As LongPrivate Sub File1_DblClick()
    Call ShellExecute(GetDesktopWindow, "Open", IIf(Right$(File1.Path, 1) = "\", File1.Path, File1.Path & "\") & File1.FileName, "", "c:", SW_SHOWNORMAL)
End Sub