表1中的数据导入到表2中，请帮我加一个控制键

中原一剑　发表于：2012-11-15 09:25:11 　

现状是填完内容直接导入到表2中，我想加一个键，点击后导入表2中

煮江品茶发表于：2012-11-15 13:29:56

Private Sub Command2_Click()
    Dim ssql As String
    ssql = "delete * from 表2"
    CurrentDb.Execute ssql
    ssql = "insert into 表2 (姓名,年龄) select 姓名,年龄 from 表1"
    CurrentDb.Execute ssql
End Sub

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

表1中的数据导入到表2中，请帮我加一个控制键