十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
两种方法
荔城网站制作公司哪家好,找成都创新互联公司!从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设等网站项目制作,到程序开发,运营维护。成都创新互联公司自2013年起到现在10年的时间,我们拥有了丰富的建站经验和运维经验,来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联公司。
1.
Shell(""Explorer.exe", AppWinStyle.NormalFocus")
2.
Dim proc As New Process
proc.StartInfo.FileName="Explorer.exe"
proc.Start
方法2给予更多的控制,如结束进程的方法Kill
因为process.start(EXEA)是VB.net
debug下这个exe打开的,所以如果EXEA里面用到了相对路径,那必然是指向VB.net
debug下的,除非在EXEA中使用绝对路径,如果EXEA你无法更改则只能用VB.net
debug下这个exe来控制了,比如EXEA如果要在他自己的目录下去找一个文件,那你就用exe把这个文件复制到VB.net
debug下
程序的兼容模式设置保存在注册表下。
在 HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers/ 下新建一个键值,键值名称是可执行程序文件的完全路径,数据类型为reg_sz,数据数值为兼容的操作系统代码。
代码对照如下:
Windows NT 4.0 (Service Pack 5):NT4SP5
windows 95:WIN95
windows 98 or windows ME:WIN98
windows 2000:WIN2000
windows xp:WINXP
windows 2003:WIN2003
比如你要以WinXP的兼容模式运行 C:\1.exe,那么就是
HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers 在这下面新建一个键,名为"C:\starcraft.exe”,再在这个键下面创建一个reg_sz类型的数据,数据值为WINXP即可。
用VB.NET操作注册表这个你可以百度到很多了。
使用Shell函数函数。
Shell函数是VB中的内部函数,它负责执行一个可执行文件,返回一个Variant(Double),如果成功的话,代表这个程序的进程ID,若不成功,则会返回0。
Shell的语法:Shell(PathName[,WindowStyle])。
PathName 为必需参数。类型为String,它指出了要执行的程序名,以及任何需要的参数或命令行变量,也可以包括路径名。
WindowStyle为可选参数。Integer类型,指定在程序运行时窗口的样式。WindowStyle有以下这些值。
示例,打开当前程序所在目录下的TEMP.EXE文件:
Dim a As Integer
a = Shell(App.Path "\TEMP.EXE")
比如要按下一个按钮来启动C:\abc.exe程序。
VB6的代码如下:
Private
Sub
Command1_Click()
Shell
("c:\abc.exe")
End
Sub
VB.Net的代码如下:
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
Process.Start("c:\abc.exe")
End
Sub