| 查看: 1152 | 回复: 3 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
wyp6356新虫 (小有名气)
|
[交流]
shell函数 已有2人参与
|
||
|
vb调用fluent执行journal文件，如何等待其结束再执行下一语句 发自小木虫Android客户端 |
回复此楼» 猜你喜欢
283求调剂
已经有5人回复
-
一志愿哈尔滨工业大学材料与化工方向336分
已经有7人回复
-
数一英一271专硕（085401）求调剂，可跨
已经有4人回复
-
0856，材料与化工321分求调剂
已经有11人回复
-
0703化学求调剂
已经有8人回复
-
277跪求调剂
已经有9人回复
-
材料277求调剂
已经有6人回复
-
085602 307分 求调剂
已经有7人回复
-
一志愿南昌大学324求调剂
已经有7人回复
-
材料与化工272求调剂
已经有6人回复
wyp6356
新虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 54.5
- 散金: 35
- 帖子: 85
- 在线: 7.4小时
- 虫号: 7551546
- 注册: 2017-12-01
- 性别: MM
- 专业: 农业水利
3楼2018-05-05 14:34:54
jjdg
版主 (知名作家)
- 程序强帖: 9
- 应助: 223 (大学生)
- 贵宾: 3.926
- 金币: 51005.2
- 红花: 238
- 帖子: 7227
- 在线: 474.2小时
- 虫号: 27000
- 注册: 2003-10-21
- 专业: 药物代谢与药物动力学
- 管辖: 程序语言
★
小木虫: 金币+0.5, 给个红包，谢谢回帖
小木虫: 金币+0.5, 给个红包，谢谢回帖
|
vb用shell调用程序，等待其结束再继续往下执行 (2006-10-18 08:57:18)转载▼ 分类： 编程 Private Const SYNCHRONIZE = &H100000 Private Const INFINITE = &HFFFFFFFF Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long Dim lngPId As Long Dim lngPHandle As Long lngPId = Shell("tmp.bat", vbHide) lngPHandle = OpenProcess(SYNCHRONIZE, 0, lngPId) If lngPHandle <> 0 Then Call WaitForSingleObject(lngPHandle, INFINITE) '无限等待，直到程式结束 Call CloseHandle(lngPHandle) End If |
2楼2018-05-04 11:12:06
4楼2019-05-17 20:40:44
10