VB 窗口置顶的问题

问题：

A程序的窗口标题会变化，我用A程序的PID号

ct = OpenProcess(&H1F0FFF, False, Text1.Text)

获取到了A程序窗口。

可是我想将A程序窗口置顶，想到了SetWindowPos函数。可是不管用。

求：如何才能将A程序的窗口置顶

小虾谢谢了。

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 LongPrivate Sub Form_Load()SetWindowPos Me.hWnd, -1, 0, 0, 0, 0, 3End Sub

还没变啊 光少 学到思念程度了？