就用shell函数 足够了
shell "cmdexe",vbhide
如果不加vbhide的ua会闪过一个黑屏 不爽
如果要执行cmd命令 shell "cmd /c net user>c:\1txt",vbhide
执行了net user命令 回显输出到了c:\1txt里
UINT WinExec:
WinExec("C:\\Windows\\Notepadexe",SW_SHOW);
WinExec("C:\\Windows\\Notepadexe C:\\aatxt",SW_SHOW);
WinExec("C:\\\\IExplorerexe >
使用Shell函数函数。
Shell函数是VB中的内部函数,它负责执行一个可执行文件,返回一个Variant(Double),如果成功的话,代表这个程序的进程ID,若不成功,则会返回0。
Shell的语法:Shell(PathName[,WindowStyle])。
PathName
为必需参数。类型为String,它指出了要执行的程序名,以及任何需要的参数或命令行变量,也可以包括路径名。
WindowStyle为可选参数。Integer类型,指定在程序运行时窗口的样式。WindowStyle有以下这些值。
示例,打开当前程序所在目录下的TEMPEXE文件:
Dim
a
As
Integer
a
=
Shell(AppPath
&
"\TEMPEXE")
你可以这样写:
x = Shell("C:\Program files\Microsoft office\office14\POWERPNTEXE")
如果你还想用POWERPNT打开指定的文件,可以如下写,注意,要打开的文件名与前面的指令间为空格!
x = Shell("C:\Program files\Microsoft office\office14\POWERPNTEXE d:\jh\第3章指令ppt")
如果你的OFFICE安装路径或版本与我的不一样,可能的路径名有点差别,自己改去吧。。。
以上语句我已经正确运行了。
以上就是关于VB中如何调用外部程序全部的内容,包括:VB中如何调用外部程序、VB中如何嵌入其他应用程序、如何用VB调用一个外部EXE程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)