dim ws As Workspace
dim DB As Database
dim rd As Recordset
Set ws = DBEngine.Workspaces(0)
Set DB = ws.OpenDatabase("D:\螺栓零件库.mdb")
Set rd = DB.OpenRecordset("参数表")
TextBox1.Text = rd.Fields("螺栓规格").Value
... ...
以上这段代码是为了实现对“螺栓零件库”里参数的引用,可是在程序运行时,在最后
一条语句处总是出现“类型不匹配”的错误,谁能帮忙看看,问题出在哪里,谢谢!!