Access快速开发平台中关闭按钮是调用的 RDPCloseForm函数,想要实现关闭后自动打开,先打开basRDPRef模块,找到RDPCloseForm函数
原函数:
Public Function RDPCloseForm(LoadedForm As Form) As Boolean
RDPCloseForm = UMVsoftRDPLib.RDPCloseForm(LoadedForm)
End Function
修改后:
Public Function RDPCloseForm(LoadedForm As Form) As Boolean
RDPCloseForm = UMVsoftRDPLib.RDPCloseForm(LoadedForm)
RunMenuCommand "OpenForm|SysFrmMain_Home|||||-1|"
End Function
这样修改后即可在点击关闭时,自动打开SysFrmMain_Home窗体。