目录 1 建立连接和查询 2. Recordset 对象(记录集)转数组 1 建立连接和查询 Sub 查询() Dim Cnn As Object, Rst As Object, i&, j&, strSQL$ Set Cnn = CreateObject(