要在access库中开启事务，需要使用VBA代码。下面是一个简单的示例，展示了如何在access库中创建一个事务：

Sub StartTransaction()Dim db As DAO.DatabaseDim ws As DAO.WorkspaceSet db = CurrentDbSet ws = DBEngine.Workspaces(0)ws.BeginTrans' 在这里执行需要在事务中执行的SQL语句ws.CommitTransSet ws = NothingSet db = NothingEnd Sub

在上面的示例中，我们使用了DAO对象来引用数据库和工作空间。首先，我们使用BeginTrans方法开始一个事务，然后在事务中执行需要执行的SQL语句，最后使用CommitTrans方法提交事务。如果在执行SQL语句过程中出现错误，可以使用Rollback方法回滚事务。