怎样激活其他应用程序的窗口

例如
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Private Sub Form_MouseDown(Button As Inte