ContinueAll

应用示例

'!TITLE“执行连续启动”
'连续执行停止的程序
Sub Sample_ContinueAll

  Dim aaa As Integer

  '并列启动其它程序
  Run ContinueAll_Sample2

  For aaa = 0 To 30

    '作为调出源的处理，显示0～30计数
    PrintDbg "Call Sample_ContinueAll " & aaa

  Next

  '停止当前启动的所有程序
  SuspendAll

  '连续执行程序
  ContinueAll

End Sub