后绑定:Dim objMath As Object Set objMath = CreateObject("Chapter6_Server.Math.1")'Set 就相当于QueryInterface txtResult = objMath.Add(txtOp1, txtOp2) vb对后绑定的支持不能访问默认接口以外的接口,后绑定不需要reference前绑定: 需要使用project->references菜单来导入类型库Dim objMath As New CHAPTER6_SERVERLib.Math'这里就已经实例化了一个com接口了 Dim objMath2 As CHAPTER6_SERVERLib.IMath2 Dim objAdvMath As CHAPTER6_SERVERLib.IAdvancedMathtxtResult = objMath.Add(txtOp1, txtOp2)
记住它的ProgID在VB里用CreateObject("ProgID")加载它
然后可以调用该DLL实现的接口
Set objMath = CreateObject("Chapter6_Server.Math.1")'Set 就相当于QueryInterface
txtResult = objMath.Add(txtOp1, txtOp2)
vb对后绑定的支持不能访问默认接口以外的接口,后绑定不需要reference前绑定:
需要使用project->references菜单来导入类型库Dim objMath As New CHAPTER6_SERVERLib.Math'这里就已经实例化了一个com接口了
Dim objMath2 As CHAPTER6_SERVERLib.IMath2
Dim objAdvMath As CHAPTER6_SERVERLib.IAdvancedMathtxtResult = objMath.Add(txtOp1, txtOp2)