13518219792
两种方法
荔城网站制作公司哪家好，找成都创新互联公司！从网页设计、网站建设、微信开发、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
