Dim da As New DataTable
Dim myda As OleDb.OleDbDataAdapter("SELECT * FROM 表“, oconnection)
myda.Fill(da)
姓名=da.Rows(0)(0) ‘张三
姓名=da.Rows(1)(0) ‘李四
姓名=da.Rows(2)(0) ‘王五
姓名=da.Rows(3)(0) ‘赵六
姓名=da.Rows(4)(0) ‘刘琦
这个不一定要用数组,直接用table就可以操作了。
你这个不是一条记录吧?应该是一个字段(列)?