通过VBA从文件导入模块

Question

我有一系列的Access数据库，我有几个模块，我想保持每个数据库中的当前。有没有办法使用VBA将代码模块导入数据库？

我有一个类似的项目，锁定数据库每天晚上：

If fso.FileExists(rst!AppAddress) = True Then 
     Set cycleDB = OpenDatabase(rst!AppAddress) 
     If cycleDB.Properties("AllowBypassKey") = True Then 
      cycleDB.Properties("AllowBypassKey") = False 
     End If 

有没有办法导入的对象到数据库这样？

Answer 1

看看Application.LoadFromText方法对你有什​​么用处。查找实际的文档可能会很棘手！