如何用vb读取access表中数据,并赋值给另一变量?

例如,access中有一表:
书名 价格 数量
aaa 10 2
bbb 15 5...
欲把价格字段各值赋给数组s[5], 用vb语言如何实现
最新回答
皮比墙厚

2024-06-26 09:14:26

比较麻烦 ....
先读取ACCESS表打开
再通过循环,将数组赋值。比较简单
枕花眠

2024-06-26 10:19:11

Dim S() As Integer
set rs=cn.Execute("Select * From TableName",30,adCmdText)
For i=0 To rs.recordcount
s(i)=rs(i)
Next i