pb7下可以使用com组件,而且方法非常的简单。

如果com组件被注册成: CSDN.Northsnow

组件中有一个public方法 为

add(x,y)

返回两个数的和。

那么在pb7中写入下代码 进行调用

 

PB调用COM组件string c
PB调用COM组件
int   intValue   
PB调用COM组件oleobject   objOle   
PB调用COM组件objOle
=create   OLEObject   
PB调用COM组件intValue
=objOle.connecttonewobject("CSDN.Northsnow")
PB调用COM组件c
=string(objOle.add(9,5))
PB调用COM组件messagebox(
"结果",c)

得到的结果为:14

相关文章: