如何用VB隐藏最置前的外部窗口？

来源：百度知道 编辑：UC知道 时间：2024/05/15 15:28:02
如何用VB程序隐藏最置前的外部窗口？比如设置一个timer时时检测其它外部窗口，谁在最前面(就是当前)就隐藏谁。代码该怎么写，给个完整的，谢谢。
-------

Declare Function sm& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any)

Declare Function GetActiveWindow Lib "user32" () As Long

hwnd1 = GetActiveWindow()
sm hwnd1, &H18, False, 4

以上语句在VB6.0 XPsp2测试通过