原帖由 psruby 于 2007-6-19 11:48 发表 Dim qtApp as QuickTest.Application Set qtApp = createobject("QuickTest.Application") qtApp.Quit '关闭qtp