使用VBA控制VBScript

为了实现多线程，在异步启动这些帮助程序脚本之前，我正在使用VBA编写以构造VBScript代码（

VBStr

）并动态写入文件：

Dim VBFile As Object
Dim VBPath As String
VBPath = CurrentProject.Path & "\" & GUID() & ".vbs"
Set VBFile = CreateObject("Scripting.FileSystemObject").CreateTextFile(VBPath)
VBFile.WriteLine VBStr
VBFile.Close

Dim Shell As Object
Set Shell = CreateObject("Wscript.Shell")

Shell.Run """" & VBPath & """"

---

但是，如何在VBA中控制这些脚本？我似乎无法理解或提及他们。假设我想在60秒后终止挂起/暂停的脚本-如何操作？

使用.Exec而不是.Run。返回的具有监视进程状态和终止进程的方法/属性