vb 打开指定bat文件

答案:4 悬赏:10 手机版

解决时间 2021-01-18 22:46

提问者网友：那叫心脏的地方装的都是你
2021-01-17 21:57

vb 打开指定bat文件

最佳答案

五星知识达人网友：时间的尘埃
2021-01-17 22:05

用Shell 函数来实施：
以下是打开在D盘根目录下的S567.bat文件的代码：
Private Sub Command1_Click()
Dim RetVal
RetVal = Shell("D:S567.bat", 1)
End SubShell 函数
执行一个可执行文件，返回一个 Variant (Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。

全部回答

1楼网友：傲气稳了全场
2021-01-18 00:48

临时新建一个bat，写入代码，隐藏运行，结束后再删除临时bat

2楼网友：零点过十分
2021-01-18 00:09

楼上的，你的图少勾了一个东西啊，那个银白色的田字啊！！教你一个更简单的方法，找到你要的bat文件，修改后缀为TXT，然后双击打开，复制里边的内容，打开VB写
Private Sub Form_Load()
Dim a As String
a = "123" '你复制的内容
Open App.Path & "/123.bat" For Output As #1
Print #1, a '必须这样写,有的时候会很多东西,需要换行,这样可以自动换行
Close #1
Shell App.Path & "/123.bat"
End Sub

3楼网友：酒醒三更
2021-01-17 23:35

Option Explicit
Private Sub Form_Load()
'从res中写入硬盘
Dim File() As Byte
File = LoadResData(101, "CUSTOM")
'标识号“ 101 ”类型“ "CUSTOM" ”可以自己改
Open "D:BAT.bat" For Binary As #1
'文件名“ "D:BAT.bat" ”可以自己改
Put #1, 1, File '保存
Close #1
'执行文件
Shell ("D:BAT.bat")
'文件名“ "D:BAT.bat" ”可以自己改
End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息