API獲得Access句柄并獲得焦點

字號:

代碼:
    Public Declare Function SetActiveWindowa Lib "user32" Alias "SetActiveWindow" (ByVal hwnd As Long) As Long
    事件中寫入
    代碼:
    SetActiveWindowa Application.hWndAccessApp
    在本人實踐過程當(dāng)中Access在調(diào)用了置頂模塊的時候會導(dǎo)致Access原本能夠獲得焦點的控件丟失焦點
    經(jīng)過大量實踐發(fā)現(xiàn)無論使用Access自身SetFocus還是API的APISetFocus都沒法讓Access重新獲得焦點
    使用了API函數(shù)SetActiveWindowa函數(shù)后這個小bug就解決了