我用API函数"FindWindow"和"FindWindowEx"获取这个窗口的句柄,但是怎么才能在这个句柄上实现改变或添加文字和触发按钮事件呢???
希望,高手能给我一个实例讲解一下.谢谢!!!!!!!!!!!!!

解决方案 »

  1.   

    http://blog.csdn.net/lxcc/archive/2004/10/20/145005.aspx
      

  2.   

    Private Sub Form_Load()
        prevWndProc = GetWindowLong(Me.hWnd, GWL_WNDPROC)
        SetWindowLong Me.hWnd, GWL_WNDPROC, AddressOf WndProc
    End Sub.......
    Function WndProc(ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
        Dim sMsg As String
        
        On Error Resume Next
        select Msg 
        case ...    WndProc = CallWindowProc(prevWndProc, hWnd, Msg, wParam, lParam)
    End Function
    Private Sub Form_Unload(Cancel As Integer)
        SetWindowLong Me.hWnd, GWL_WNDPROC, prevWndProc
    End Sub