对象获取电脑硬件详情工具

obj.创建 (“Scriptcontrol”, )
obj.写属性 (“Language”, “VBScript”)
obj.通用方法 (“AddCode”, #Code)
临时文本 ＝ obj.文本方法 (“Run”, “GetSysInfo”)
编辑框1.内容 ＝ 临时文本