Question

vb如何将两个list中的所有内容分别添加到数据库的两列

同时将list1和list2中所有内容加到数据库指定列A和B.
要求list1中的数据和list2中的数据是同步的。
如：
SQL = "select * from CER"
rs.Open SQL, cn, 3, 3
Dim t As Integer
Dim s As Integer
For t = 0 To List1.ListCount - 1
For s = 0 To List2.ListCount - 1
rs.AddNew

rs.Fields("A") = List1.List(t)
rs.Fields("B") = List2.List(s)
rs.Update
rs.MoveNext
Next t
Next s
出错啦！请帮忙纠正！！！谢谢！

Answer 1

SQL = "select * from CER"
rs.Open SQL, cn, 3, 3
Dim t As Integer
Dim s As Integer
For t = 0 To List1.ListCount - 1
rs.AddNew
rs.Fields("A") = List1.List(t)
rs.Fields("B") = List2.List(t)
rs.Update
Next t