实时异常'-21470248828007000e)'

实时错误'-21470248828007000e)':
我用VB写了一段程序，一直用起来很正常，昨天电脑重装了系统之后，重新安装了vb，运行起来这段程序之后就会出现如下情况

  “实时错误'-21470248828007000e)': memory alloc fail or object create fail ocuured in control”

我的程序代码如下：

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\fgjl.mdb;Persist Security Info=False"

Adodc1.RecordSource = "select * from 表1"

Adodc1.Refresh

  'iComPort = Adodc1.Recordset.Fields("COM")
   
  'iBandRate = Adodc1.Recordset.Fields("BYT")
   
  ActQJ71C241.ActCpuType = 50
   
  ActQJ71C241.ActBaudRate = iBandRate '19200
   
  ActQJ71C241.ActControl = 8
   
  ActQJ71C241.ActPortNumber = iComPort
   
  ActQJ71C241.ActConnectUnitNumber = 0
   
  lRet = ActQJ71C241.Open 'The Open method is executed.  
   
  If lRet <> 0 Then
   
  MsgBox "串口打开失败（" & lRet & "）！", vbOKOnly, "系统提示"
   
  StatusBar1.Panels(6).Text = "串口打开失败！(" & lRet & ")"
   
  Else: StatusBar1.Panels(6).Text = "串口打开"
   
  End If
   
  'Error: 'Exception processing
   
  ' MsgBox "系统错误！", vbOKOnly, "错误"
   
End Sub

调试显示是黄色的一句（lRet = ActQJ71C241.Open） 有问题，请问高手如何解决
谢谢

[解决办法]
可以用串口调试工具来试试你的串口是否能正常工作。
[解决办法]
和串口没关系。关键是不知道ActQJ71C241.Open 'The Open method is executed.是操作什么的？

[解决办法]
控件或dll可能需要注册以后才能正常。

[解决办法]
是不是操作的控件没有注册或引用
[解决办法]
是不是操作的控件没有注册或引用