24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1154  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

wyp6356

新虫 (小有名气)

[交流] shell函数 已有2人参与

vb调用fluent执行journal文件,如何等待其结束再执行下一语句

发自小木虫Android客户端
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhaomaogen

银虫 (小有名气)

原程序引用的是一个批处理文件,你直接引用输入的内容不一定和批处理文件一致,检查下看看。
4楼2019-05-17 20:40:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

jjdg

版主 (知名作家)

优秀版主


小木虫: 金币+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
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wyp6356

新虫 (小有名气)

引用回帖:
2楼: Originally posted by jjdg at 2018-05-04 11:12:06
vb用shell调用程序,等待其结束再继续往下执行 (2006-10-18 08:57:18)转载▼
分类: 编程
Private Const SYNCHRONIZE = &amp;H100000
Private Const INFINITE = &amp;HFFFFFFFF

Private Declare Fun ...

试过这个了,  只改了这个 lngPId = Shell("E:\Program Files\ANSYS Inc\v150\fluent\ntbin\win64\fluent.exe -r15.0.0 3d -i F:\ppppp\oh.jou", vbHide),vb不会等待fluent结束
3楼2018-05-05 14:34:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 各位老师好,我的一志愿为北京科技大学085601材料专硕 +7 Koxui 2026-03-28 7/350 2026-03-29 00:58 by 我是小康
[考研] 2026年华南师范大学欢迎化学,化工,生物,生医工等专业优秀学子加入! +3 llss0711 2026-03-28 5/250 2026-03-29 00:23 by MRMFYTL
[考研] 322求调剂 +7 宋明欣 2026-03-27 7/350 2026-03-28 21:27 by sanrepian
[考研] 311(085601)求调剂 +4 liziyeyeye 2026-03-28 4/200 2026-03-28 18:50 by 535743368
[考研] 本科新能源科学与工程,一志愿华理能动285求调剂 +3 AZMK 2026-03-27 5/250 2026-03-28 16:19 by xxxsssccc
[考研] 308求调剂 +7 墨墨漠 2026-03-27 7/350 2026-03-28 07:43 by 热情沙漠
[考研] 291求调剂 +7 孅華 2026-03-22 7/350 2026-03-28 04:02 by fmesaito
[考研] 352分 化工与材料 +5 海纳百川Ly 2026-03-27 5/250 2026-03-28 03:39 by fmesaito
[考研] 275求调剂 +10 jjjjjjjjjjl 2026-03-27 10/500 2026-03-27 23:47 by barnett0632
[考研] 272求调剂 +7 脚滑的守法公民 2026-03-27 7/350 2026-03-27 17:23 by laoshidan
[考研] 316求调剂 +5 Pigcasso 2026-03-24 5/250 2026-03-27 12:10 by zhshch
[考研] 0703化学一志愿南京师范大学303求调剂 +3 zzffylgg 2026-03-24 3/150 2026-03-27 10:42 by shangxh
[考研] 一志愿陕师大生物学071000,298分,求调剂 +5 SYA! 2026-03-23 5/250 2026-03-27 09:29 by 不吃魚的貓
[考研] 359求调剂 +4 王了个楠 2026-03-25 4/200 2026-03-27 08:43 by 不吃魚的貓
[考研] 324求调剂 +8 hanamiko 2026-03-26 10/500 2026-03-27 08:06 by hypershenger
[考研] 329求调剂 +7 钮恩雪 2026-03-25 7/350 2026-03-27 04:28 by wxiongid
[考研] 【双一流院校新能源、环境材料,材料加工与模拟招收大量调剂】 +4 Higraduate 2026-03-22 8/400 2026-03-26 20:34 by Higraduate
[考研] 一志愿南航 335分 | 0856材料化工 | GPA 4.07 | 有科研经历 +6 cccchenso 2026-03-23 6/300 2026-03-25 22:25 by 544594351
[考研] 290分调剂求助 +3 吉祥止止陈 2026-03-25 3/150 2026-03-25 19:58 by barlinike
[考研] 调剂 +4 13853210211 2026-03-24 4/200 2026-03-24 19:44 by ms629
信息提示
请填处理意见