Question

如何利用vb数组接收数据库的查询结果？

Answer 1

数据库指的是SQLServr吧。
查询应该是用select语句来查询的，那么要先建立与数据库的连接，再向数据库发送select查询命令，就会返回查询结果，要用recordset(vb6)或datareader等对象来读取。

再从上述对象中将数据保存到数组中。

Answer 2

这个太简单了吧
给你一个函数，自己慢慢体会
Public Function getanswerA(ByVal 所求变量 As Integer) As String
mycon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=你的数据库文件名;"
zongji = "select * from [数据表名] where 字段='" & 所根据变量 & "'"
myrs.Open zongji, mycon
所求变量 = myrs.Fields("所求变量")
myrs.Close
mycon.Close
End Function