public static void AfterTestHandler(object sender, EventArgs e) { BaseVBAScriptTask whichtask = (BaseVBAScriptTask)sender; if (whichtask.Status == TaskStatus.Succeed && ms_IsClosed == false) { switch (ms_tp) { case TestPhase.Preparation: SetSyntaxDocumentText(ms_domain.ParserScript); ms_task = new LocalParserVBAScriptTask(ms_domain.DomainGUID, whichtask.TaskChainGUID, ms_vbaobjects); whichtask.VBAObjs = null; ms_task.AfterScript += new EventHandler(AfterTestHandler); ms_task.Run(); ms_tp = TestPhase.Parser; whichtask.Dispose(); break; case TestPhase.Parser: SetSyntaxDocumentText(ms_domain.StorageScript); ms_task = new LocalStorageVBAScriptTask(ms_domain.DomainGUID, whichtask.TaskChainGUID, ms_vbaobjects); whichtask.VBAObjs = null; ms_task.AfterScript += new EventHandler(AfterTestHandler); ms_task.Run(); ms_tp = TestPhase.Storage; whichtask.Dispose(); break; case TestPhase.Storage: MessageBox.Show("测试结束,请检查日志以确定代码是否正确", "通知", MessageBoxButtons.OK, MessageBoxIcon.Information); whichtask.Dispose(); ms_task = null; ms_tps = TestProcessStatus.Ready; RefreshTestToolButtons(); break; } } else { whichtask.Dispose(); ms_task = null; ms_tps = TestProcessStatus.Ready; RefreshTestToolButtons(); } }