如何将一个数组中的数据导入到ACCESS数据库中？？？？在线等待

Question

如何将一个数组中的数据导入到ACCESS数据库中？现在有个数组中存有从图象中提取的一些数据，现在我想把这些数据导入到ACCESS中，如何实现？

Answer 1

将数组(arr)的数据插入表中（需要引用ADO：工程/引用/Microsoft ActiveX Data Object 2.X Library）：Private Sub Command1_Click()
    Dim cn As New ADODB.Connection
    cn.CursorLocation = adUseClient
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
    For i = LBound(arr) To UBound(arr)
        cn.Execute ("insert into tableName values('" & arr(i) & "')")
    Next
    cn.Close
    Set cn = Nothing
End Sub