大家好,目前我在编写一个程序时遇到了一个问题,即通过一个Access应用程序A调用另一个Access应用程序B的功能,并且打开B中的一个窗体来显示所需的信息。我已经实现了这些功能,但是Access应用程序B中的主窗体不能自动显示在其他Windows窗体的前面,每次都需要手动点击。我尝试了以下代码,但效果不佳: dim B as Access.Application B.OpenAccessProject(\"C:proB.adp\") B.DoCmd.OpenForm \"from1\", acNormal, , \"编号='\" & Me.编号 & \"'\", , acWindowNormal B.Forms(\"form1\").SetFocus Dim lpPoint As POINTAPI Call GetCursorPos(lpPoint) Call SetWindowPos(GetParent(B.Forms(\"form1\").hwnd), HWND_TOPMOST, 0, SWP_NOSIZE) Call ShowWindow(GetParent(B.Forms(\"form1\").hwnd), SW_SHOWMAXIMIZED)