3.我们知道创建一个类的实例方法是通过以下方式来进行的
Set 实例名 = New 类名
此时如果直接在QTP中进行创建类的话会直接报错:
Set eom = new ExcelClass
eom.t1
4.那么对于以上这种情况,我们一般所采用的方式是在函数库中建立一个函数,让此函数返回这个类的实例化。
Class ExcelClass Sub t1() MsgBox "t1" End Sub Sub t2() MsgBox "t2" End Sub End Class '定义ExcelClass的无参构造 Function NewExcelClass Set NewExcelClass = new ExcelClass End Function |
5. 接着在QTP脚本编辑区中直接把这个函数返回就可以使用了
Set eom = NewExcelClass eom.t1 |
思考:
是否可以按照如图所示的方式把New ExcelClass作为函数名进行编写呢,这样我们就可以直接在QTP脚本区中进行new一个类出来,是不是更加直观呢,这一块我们会留到下一讲进行讲解。
总结:
这一讲内容比较基础,主要还是为了照顾一些新人,下一讲我们会继续深入讲解类构造器,主要会涉及到带参构造器的设计模式,请大家期待。