VB6在Win10下调用CreateProcess启动cmd.exe调用SetParent后立即关闭问题

原因说明 #

• Windows 10 对控制台程序新增了安全校验逻辑，cmd.exe 启动时会和系统控制台宿主 conhost.exe 绑定，校验自身运行环境合法性。当你调用 SetParent 强行修改它的父窗口时，cmd 会判定运行环境异常，主动触发退出逻辑。而 calc.exe 是普通 GUI 程序，没有这套校验机制，所以不受影响。
• 你调用 SetParent 的时机过早：CreateProcess 执行完成仅代表进程内核对象创建成功，不代表程序窗口已经初始化完成，此时强行修改未初始化窗口的父属性，会打断 cmd 的初始化流程，直接导致进程退出。
• 权限不匹配也会触发该问题：如果你的宿主程序和启动的 cmd.exe 权限等级不一致（比如你的程序以管理员身份运行，cmd 默认是普通用户权限），Windows 的用户界面特权隔离（UIPI）机制会拦截跨权限的父窗口修改操作，控制台程序遇到这类拦截会直接退出，避免被恶意程序篡改。

修复方案 #

1. 调整 cmd 启动参数
   修改代码中的 sCommandLine 参数，传入 /k，该参数会强制 cmd 启动后保持运行状态，覆盖默认无操作自动退出的逻辑：

sCommandLine = "/k"

2. 延后 SetParent 调用时机
   CreateProcess 执行后不要立刻调用 SetParent，先调用 WaitForInputIdle 函数等待进程输入队列空闲，确认 cmd 窗口初始化完成后，再获取窗口句柄执行 SetParent 操作，避免打断初始化流程。
3. 提前指定父进程（更稳定方案）
   Vista 及以上版本系统，可以在调用 CreateProcess 时通过 PROC_THREAD_ATTRIBUTE_PARENT_PROCESS 属性直接指定父进程，不需要后续调用 SetParent，完全不会触发 cmd 的安全校验。

内容的提问来源于stack exchange，提问作者Pl4tinum