各位老大,我找遍了所有的api,连以下三个都实现不了了,快救救我!!!
Private Declare Function BringWindowToTop Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function SetActiveWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Timer1_Timer()
BringWindowToTop Me.hwnd
SetForegroundWindow Me.hwnd
SetActiveWindow Me.hwnd
End Sub