系统服务管理工具

图片框_等待.移动 (0, 0, 超级列表框_系统服务管理.宽度, 超级列表框_系统服务管理.高度)
连续赋值 (真, 图片框_LoadingImage.可视, 图片框_LoadingImage.播放动画, 图片框_等待.可视)
objWbemLocator.创建 (“WbemScripting.SWbemLocator”, )
objWMIService ＝ objWbemLocator.对象型方法 (“ConnectServer”, “.”, “root\CIMV2”, , , , , , )
wbemObjectSet ＝ objWMIService.对象型方法 (“ExecQuery”, “Select * from Win32_Service”, , , )
服务总数 ＝ 到整数 (wbemObjectSet.读数值属性 (“Count”, ))
标签_项目.标题 ＝ “共找到” ＋ 到文本 (服务总数) ＋ “个项目”