关于mscomm串口通信

1.在一个类cTest模块中，创建一个mscomm，生成pTest.dll文件

Public WithEvents vCom As MSComm


Private Sub Class_Initialize()
Set vCom = CreateObject("MSCommLib.MSComm ")
End Sub


Public Sub OpenPort()
If vCom.PortOpen = False Then
vCom.PortOpen = True
MsgBox "打开成功"
Else
MsgBox "打开失败"
End If
End Sub

2.新建一个工程引用这个dll文件
Public Test As cTest

Private Sub Command1_Click()
Set Test = New cTest
Test.OpenPort''
End Sub


3.点击按钮运行出现一下错误



ActiveX 部件不能创建对象或返回对该对象的引用（错误 429）
这个是什么原因，怎么修改？


4.我可不可以把mscomm控件的事件和属性都写在cTest.dll中，然后在别的工程中调用即可？？？

为什么不用API来实现你这个DLL？
http://download.csdn.net/detail/veron_04/1339593