Function CreateObject(sID as String, Optional objParam as Object, Optional isNotCreate As Boolean = False) as Object
sID -- 需要创建实例的组件名称,要求组件名称必须和文件名称一致,同时必须实例名为 sID.O4
例如,凭证: sID 为 voucher , 你必须要实现一个类 voucher.O4 ,同时文件名必须为 voucher.dll
当 sID 包含 小数点时,系统会按VB的 CreateObject 方法来创建实例,如 sID = "Adodb.Connection"
objParam -- 参数对象,可选,因为VB不支持可变数量和类型的函数参数列表,所以当你要调用某个组件时,你必须先创建一个参数对象实例,
把你的参数全部以属性值的方式存放到objParam中一次传递。
isNotCreate -- 是否不要执行4FNexus组建的Create函数,默认为False,如果为True,则创建对象后直接返回该对象,而不是返回执行Create后的结果对象
返回值:对象实例(如果为4FNexus组件,则返回Create调用后的结果对象),如果创建失败,将提示错误并返回Nothing
注意:要创建的组件类中必须实现一个 Create(objApp as Object , Optional objParam as Object) 的过程或者函数,这个过程和函数
MyApp.CreateObject 的内部实现中,创建你的组件后会马上调用Create函数(或过程),并把参数对象传递给新创建成功的组件,组件在处理完成后返回一个ObjReault
特殊地:4FNexus的UI组件必须以UI4开头,默认界面为UI4Default.dll
建议: objParam 和 ObjReault 可以使用VB只带的Collection 或者 ScriptRunTime里面的Dectionary 对象。