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

如果com组件被注册成： .Northsnow

组件中有一个public方法 为

add(x,y)

返回两个数的和。

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

 

string 
   c
 
  int 
     intValue   
oleobject   objOle   
objOle 
  = 
  create   OLEObject   
intValue 
  = 
  objOle.connecttonewobject( 
  " 
  CSDN.Northsnow 
  " 
  )
c 
  = 
  string 
  (objOle.add( 
  9 
  , 
  5 
  ))
messagebox( 
  " 
  结果 
  " 
  ,c)

得到的结果为：14