简述:
如何编程打开其他数据库中的窗体?
问题:
如何编程打开其他数据库中的窗体,使用完毕后退回?
我新建了一个数据库,里面只有一个Form,我想在Form上添加几个按钮,每个按钮上对应一个Click事件,事件的动作就是打相应的Access数据库,并执行该数据库中的Menu表单,关闭数据库后又回到有按钮的Form来.
回答:
Function OpenOhterMDB()
Dim objApp As New Access.Application
objApp.OpenCurrentDatabase CurrentProject.Path & "sample.mdb"
objApp.DoCmd.OpenForm "newform"
End Function