spath = "c:\tmp\abc1.txt"
lret = ShellExecute(hwnd, "open", spath, vbNull, vbNull, SW_SHOWNORMAL)
If lret >= 0 And lret <= 32 Then
MsgBox "error opening viewer program"
End If
上述语句我执行后没有任何反映但如运行work、excel等文件都可以打开。
lret = ShellExecute(hwnd, "open", spath, vbNull, vbNull, SW_SHOWNORMAL)
If lret >= 0 And lret <= 32 Then
MsgBox "error opening viewer program"
End If
上述语句我执行后没有任何反映但如运行work、excel等文件都可以打开。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货