在ACCESS窗体里编写VBA代码可以一次执行多条SQL语句
例如:
Private Sub Command1_Click()
Dim Sql1 As String,Sql2,As String,Sql3 As String
Sql1="insert into t1(id,name) values('001','Zhangsan');"
Sql2="insert into t1(id,name) values('002','Lisi');"
Sql3="insert into t1(id,name) values('003','Wanghwu');"
With CurrentProject.Connection
.Execute Sql1
.Execute Sql2
.Execute Sql3
End With
End Sub
前提是每条SQL语句都是可以被正确执行的