类型初始值设定项引发异常

Module 声明
Friend DAODBEngine_definst As New DAO.DBEngine
Public oXL As Microsoft.Office.Interop.Excel.Application
Public oWB As Microsoft.Office.Interop.Excel.Workbook
Public oSheet As Microsoft.Office.Interop.Excel.Worksheet
Public DBunbten As dao.Database
Public rstljdj, rstweather, rstjswires, rsttower, rstwires, rstxianlu, rstcontrol, rstljdjtemp, rsthucanjiaoyan As dao.Recordset
Public rstxianchang As dao.Recordset
End Module

运行到:DBunbten = DAODBEngine_definst.Workspaces(0).OpenDatabase("UNBTEN.mdb")

img


提示: 类型初始值设定项引发异常