如何在VB中运行EXE文件
我想在VB中运行外部的EXE文件,却不知如何做,请大家帮帮忙。谢谢! 问题点数:50、回复次数:2Top
1 楼mafangsan(mafangsan)回复于 2000-06-15 15:37:00 得分 50
shell函数
执行一个可执行文件,返回一个 Variant (Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。
Shell(pathname[,windowstyle])
Shell 函数的语法含有下面这些命名参数:
pathname为完整带路径的文件名
windowstyle 命名参数有以下这些值:
常量 值 描述
vbHide 0 窗口被隐藏,且焦点会移到隐式窗口。
VbNormalFocus 1 窗口具有焦点,且会还原到它原来的大小和位置。
VbMinimizedFocus 2 窗口会以一个具有焦点的图标来显示。
VbMaximizedFocus 3 窗口是一个具有焦点的最大化窗口。
VbNormalNoFocus 4 窗口会被还原到最近使用的大小和位置,而当前活动的窗口仍然保持活动。
VbMinimizedNoFocus 6 窗口会以一个图标来显示。而当前活动的的窗口仍然保持活动。
Top
2 楼mafangsan(mafangsan)回复于 2000-06-15 16:00:00 得分 0
Private Sub Command1_Click()
dim ret as long
ret=shell("c:\windows\notepad.exe",1)
end subTop




