189 8069 5689
运行一个可执行程序，并且如果该程序仍然在运行，则返回一个包含该程序的进程
成都创新互联公司专注于企业全网营销推广、网站重做改版、黄岛网站定制设计、自适应品牌网站建设、H5场景定制、商城网站定制开发、集团公司官网建设、外贸营销网站建设、高端网站制作、响应式网页设计等建站业务，价格优惠性价比高，为黄岛等各大城市提供网站开发制作服务。
ID
的整数。
Public
Function
Shell(
_
ByVal
PathName
As
String,
_
Optional
ByVal
Style
As
AppWinStyle
=
AppWinStyle.MinimizedFocus,
_
Optional
ByVal
Wait
As
Boolean
=
False,
_
Optional
ByVal
Timeout
As
Integer
=
-1
_
)
As
Integer
参数
PathName
必选。String。要执行的程序的名称，以及任何必选的参数和命令行开关。PathName
也可以包含驱动器和目录路径或文件夹。
如果您不知道程序的路径，可以使用
My.Computer.FileSystem.GetFiles
方法进行查找。例如，调用
My.Computer.FileSystem.GetFiles("C:\",
True,
"testFile.txt")
可以返回驱动器
C:\
上任意处的名称为
testFile.txt
的每个文件的完整路径。
Style
可选。AppWinStyle。从
AppWinStyle
枚举中选择的值，指定要在其中运行程序的窗口的样式。如果省略
Style，则
Shell
将使用
AppWinStyle.MinimizedFocus，它启动程序后最小化并带有焦点。
Wait
可选。Boolean。指示
Shell
函数是否应等待程序完成的值。如果省略
Wait，Shell
将使用
False。
Timeout
可选。Integer。Wait
为
True
时要等待的毫秒数。如果省略
Timeout，则
Shell
使用
-1
表示没有超时，并且
Shell
直到程序完成才会返回。因此，如果省略
Timeout
或将其设置为
-1，则
Shell
可能永远不会将控制返回您的程序。
如果你要获得显示的结果，我知道的方法是使用一个dos管道（名字玄乎，实际上没什么）
在命令的最后加一个
(filename)
这样这个命令所有的显示结果就背记录在(filename)里面了
比如
dir
a.txt
这样dir显示的结果就是背全部记录在a.txt里面
写一个函数
function nettime(ip)
open app.path "\nt.bat" for output as #1
print #1,"@net time \\" ip " nt.dat"
close #1
shell app.path "\nt.bat",vbhide
doevents
'这里你查查相关资料，关于shell的WAIT，可能用doevents不能等到执行完成，所以可能得不到需要的数据， 里有资料
open app.path "\nt.dat" for intput as #1
dim x as sting
do until eof(1)
input #1,x
nettime=nettime x
loop
nettime=replace(nettime,vbcrlf,"")
nettime=replace(nettime," ","")
end function
调用就可以了，得到什么我不知道，没有可用的服务器
VB.NET 里面会有一个main方法表示函数的入口
main方法的参数就是命令行传给它的
shutdown.exe能直接调用是因为你的环境变量有C盘的windows目录
你只要在你程序的输出目录(一般为bin)里面打开命令行输入程序名称.exe就可以直接执行你的窗体
如果你要调试输入命令的效果,你打开你项目的属性,找到调试里面的命令行参数,在里面输入测试参数就能在你main函数里面看到结果了
那如果你想打开任何命令行都可以执行你的窗体程序,那你把你程序的安装目录设置为环境变量,这样就可以直接执行这个命令了
你好！
添加一个全局类，添加一个
Main
静态方法，让它接收一个类型为字符串数组的参数，并设置项目属性的启动项目为Main函数即可。
但是要注意在Main函数中运行窗体。Application.Run()
希望对你有所帮助，望采纳。