有关filelistbox的问题?

Question

没人知道吗？拜托了高手们,不要吝啬我说到做到，肯定给加分的！！！

Answer 1

需要修改注册表的。
在注册表里面建立关联。

Answer 2

求求你啦，说清楚点，我把分都给你一个人！

Answer 3

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 = 1Private Sub File1_DblClick()    ShellExecute Me.hwnd, vbNullString, IIf(Right(File1.Path, 1) = "\", File1.Path, File1.Path & "\") & File1.FileName, vbNullString, "C:\", SW_SHOWNORMAL
End Sub
'已调试成功。API  的问题找 ygyuan.go.163.com

Answer 4

果真高手，分都给你一个人，怎么样！