江淮货车3.3米报价双排:无效的过程调用或参数 (vb)

来源:百度文库 编辑:高校问答 时间:2024/04/27 21:41:11
我在VB6.0中用SHELL命令是出现的错误,
当我指定系统文件时如:
Private Sub Command1_Click()
Shell "cmd.exe"
End Sub
可以正常运行。
但当我指定某一具体路径时如:
Private Sub Command1_Click()
Shell "E:\1.txt"
End Sub
就不能运行了
回出现错误提示:
实时错误'5':
无效的过程调用或参数

请高手帮忙解决以下啊

Shell 只能调用可执行文件。

函数声明:
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
函数调用:
Public Sub ShellFile(ByVal strFile As String)
Dim rtn As Long, hWnd As Long
On Error Resume Next
rtn = ShellExecute(hWnd, "OPEN", strFile, "", "", 1)
End Sub
通过SheetFile可以自动启动对应的程序并打开文档。