(转)CreateObject函数
51Testing软件测试网EZ8prK-o1N /Ou x]w+e R0创建并返回一个对 ActiveX 对象的引用。 C^%a-ub)m|&~'V0 FEJ7fnw,R2c,Ixu0语法 +mi0e.R vm-w'k#X1ph.@051Testing软件测试网z i1lBu}|'uA6X CreateObject(class,[servername]) ,H#J R/JY,T.M*_]"cU0 h~.^v)WY_l Q0CreateObject 函数的语法有如下部分: 4uF c6C5oA5~0 HE+? YW#h2nJ~G0部分 描述 1y(Me$BQs&q051Testing软件测试网 s N%c|8iUQX class 必需的; Variant (String). 要创建的应用程序名称和类。51Testing软件测试网d2KR1@9y7bG;\ 51Testing软件测试网~/ghq } servername 可选的; Variant (String). 要在其上创建对象的网络服务器名称。 {7F5J4]p:KQJ051Testing软件测试网)@J;w NxH class 参数使用 appname.objecttype 这种语法,包括以下部分:51Testing软件测试网~ [*X6P#q 51Testing软件测试网2e:H Nx ]^${ 部分 描述51Testing软件测试网w~ j,{gK ~CKF d?0appname 必需的;Variant(字符串)。提供该对象的应用程序名。 :i i@y _m"~8W0 %I-lI_'U!Wa'vUhp0objecttype 必需的;Variant(字符串)。待创建对象的类型或类。 *ZJ6HC.\|/U051Testing软件测试网yD@-Y6g5FW e*W 说明51Testing软件测试网p0{*i4{9Mx(BY l{&T6c,UU-_H$H^0每个支持自动化的应用程序都至少提供一种对象类型。例如,一个字处理应用程序可能会提供 Application 对象,Document 对象,以及 Toolbar 对象。51Testing软件测试网Kd4f{d 51Testing软件测试网,C)O2eY7h9X ^ \tc8a 要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个对象变量: |VNv%XT0 k$r[UO&w ?_ `0'声明一个对象变量来存放该对象51Testing软件测试网4C7b"Q1aq^ 51Testing软件测试网h#PJ3Kjy '的引用。Dim as Object 采用后期绑定方式。51Testing软件测试网y#n,jf__N9W\ 51Testing软件测试网:f0C e!eH(c yw3Y8} Dim ExcelSheet As Object SQ y+m$bma&@051Testing软件测试网^V,R |p$P Set ExcelSheet = CreateObject("Excel.Sheet")51Testing软件测试网;C&W)KmZr.I[/|'w ,x!^]3D$z0上述代码将启动该应用程序创建该对象,在本例中就是创建一个 Microsoft Excel 电子数据表。对象创建后,就可以在代码中使用自定义的对象变量来引用该对象。在下面的示例中,可以使用对象变量 ExcelSheet 来访问新建对象的属性和方法,以及访问 Microsoft Excel 的其它对象,包括应用程序对象和单元格集合。51Testing软件测试网RJ N2r9|[Y {-H q |