jjww123 发表于 2009-2-3 23:35

VB读取ACCESS数据库的问题~高手指导下!谢谢

Dim TL1 As Double
'连接数据库
Set adoCon = New Connection
adoCon.CursorLocation = adUseClient
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\Chen\Documents\abc.mdb;"

Set adoRs = New Recordset
adoRs.Open "Ergonomics", adoCon, adOpenDynamic, adLockOptimistic

TL1 = "SELECT CL FROM Ergonomics where Hmin=100"

我想问的是:打开数据库以后,如何查询其中的某个数据,然后给一个变量赋值?上面的程序是查询Ergonomics表中当HMIN值为100时候 返回对应的CL值。然后赋给TL1。。。请高手指导!谢谢!
系统提示最后一句有“类型错误”。。请问如何解决?

打开数据库以后,如何查询其中的某个数据,然后给一个变量赋值
页: [1]
查看完整版本: VB读取ACCESS数据库的问题~高手指导下!谢谢