摘要: 新建模块——>贴上下面代码——>运行Function ClearAllData() Dim rst As Object DoCmd.SetWarnings False Set rst = CreateObject("ADODB.Recordset") rst.Sour... 阅读全文
posted @ 2016-01-06 10:57 EleMMent 阅读(1806) 评论(0) 推荐(0)