如何在Access中编写VBA以运行更改查询

Question

我有一堆更新和更改查询，我想在VBA中一次运行。我是VBA的新手，所以我需要在模块中编写什么才能在VBA窗口中运行它？我只能找到以下内容：

CurrentDb.Execute "Query1" CurrentDb.Execute "Query2"

在开始和结束时还需要添加什么才能让它运行？

Answer 1

这是需要添加的内容：

 `Option Compare Database
 Option Explicit
 Function Queries()
 CurrentDb.Execute "Query1"
 CurrentDb.Execute "Query2"
 End Function
`