Office中国论坛/Access中国论坛
标题:
请教用GetRows为数组赋值?
[打印本页]
作者:
jakyky
时间:
2012-1-30 14:37
标题:
请教用GetRows为数组赋值?
各位新年好。
本人新手,想请教各位用getrows为数组赋值的代码怎么写?
如表tblTest
ID Name Price
-------------------------
1 马蹄 0.5
2 胡萝卜 0.7
3 青菜 3.0
4 鲜虾 4.5
5 大米 2.1
想定义数组ArrPrice(),并把Price字段里面的数值赋给ArrPrice(),用getrows怎么写代码啊?
听说用getrows比较快,不知道是不是真的呢?
谢谢各位了。
作者:
t小宝
时间:
2012-1-30 15:25
象下面这样用,详细说明请查看帮助
Dim rst As New ADODB.Recordset
Dim strSQL As String
Dim ArrPrice() As String
strSQL = "Select * From tblTest"
rst.Open strSQL, CurrentProject.Connection, adOpenDynamic, adLockOptimistic
ArrPrice() = rst.GetRows(, , "Price")
rst.Close
复制代码
作者:
jakyky
时间:
2012-1-30 15:55
可以了,谢谢斑竹。
欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)
Powered by Discuz! X3.3