如何获得控件的句柄

wang1999

在VB中每个控件都有HWND属性来获得其句柄。但在Access中却没有这一属性（只有窗体及报表有Hwnd属性），请问大侠如何在Access获得控件的句柄？





答：Private Declare Function apiGetFocus Lib "user32" _

        Alias "GetFocus" _

         () As Long

         

Function fhWnd(ctl As Control) As Long

    On Error Resume Next

    ctl.SetFocus

    If Err Then

        fhWnd = 0

    Else

        fhWnd = apiGetFocus

    End If

    On Error GoTo 0

End Function

wang1999

非常感谢zhengjialon你再一次帮助,但下面这句英文看了半天没有能理解,希望大哥再解释一下   When an Access control on a form receives the focus, it becomes a true window and it's possible to retrieve it's handle by using the GetFocus API.   Note that because Access controls do not behave like VB controls, there's not a whole lot that we can do with the hWnd.

wang1999

非常感谢方漠,完全正确,我认为也是这样的意思