如何让Access父窗体（主窗体）位于任何windows窗体的前面？

lkkl66

回复 David.cn 的帖子

Private Declare Function SetWindowPos Lib "user32" _
    (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
   ByVal X As Long, ByVal y As Long, ByVal cx As Long, _
   ByVal cy As Long, ByVal wFlags As Long) As Long
    在窗体加载事件：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Form_Load()   
DoCmd.RunCommand acCmdAppMinimize     '登录时的窗口突出化
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 3 '登录时的窗口置前
SetWindowPos Me.hwnd, -2, 0, 0, 0, 0, 3 '马上恢复正常
End Sub
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝