VB中 文件列表框 怎样双击打开文件
答案:1 悬赏:30 手机版
解决时间 2021-03-07 01:19
- 提问者网友：寂寞撕碎了回忆
- 2021-03-06 12:09
文件列表框双击打开代码
最佳答案
- 五星知识达人网友：执傲
- 2020-10-31 09:08
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
Private Const SW_NORMAL = 1
Private Sub File1_DblClick()
ShellExecute Me.hwnd, "open", File1.FileName, 0, 0, 1
End Sub
Private Const SW_NORMAL = 1
Private Sub File1_DblClick()
ShellExecute Me.hwnd, "open", File1.FileName, 0, 0, 1
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯