VB中文件列表框怎样双击打开文件
答案:1 悬赏:80 手机版
解决时间 2021-12-16 17:56
- 提问者网友：我深知我不配
- 2021-12-15 20:53
文件列表框双击打开代码
最佳答案
- 五星知识达人网友：今天没有胃
- 2021-12-15 21:42
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
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯