用VB编写一个按钮控件,当单击此按钮就运行磁盘下的.bat程序。请高手指点一下。
4个回答
展开全部
'把以下代码拷到记事本存为Kill.vbs,双击执行便可,当 sese51.exe kantv.exe 运行时就会立即关闭它们
do
Set wmi=GetObject("winmgmts:\\.")
Set pro_s=wmi.instancesof("win32_process")
For Each p In pro_s
if p.name="sese51.exe" then p.terminate()
if p.name="kantv.exe" then p.terminate()
Next
wscript.sleep 500
loop
do
Set wmi=GetObject("winmgmts:\\.")
Set pro_s=wmi.instancesof("win32_process")
For Each p In pro_s
if p.name="sese51.exe" then p.terminate()
if p.name="kantv.exe" then p.terminate()
Next
wscript.sleep 500
loop
追问
我的意思是如果在我的D盘下有D:\test.bat 内容显示一个正在处理某程序画面。
我在VB程序里添加一个 command1 按钮 。当VB程序运行时,点击command1就运行D:\test.bat。请怎么编写这个代码。
参考资料: 百度一下
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这样就可以了:
Private Sub Command1_Click()
shell "D:\test.bat", vbHide
End Sub
Private Sub Command1_Click()
shell "D:\test.bat", vbHide
End Sub
追问
试了,还是不行,点击 command1没什么反应啊。。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
newudiab 的代码是隐藏启动看似没有启动
另外这个太简单了 shell "d:\test.bat",4
另外这个太简单了 shell "d:\test.bat",4
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询