Visual Basic - Ventanas

Me gustaria saber como se hace para maximizar o minizar la ventana de la aplicación activa.

muchas gracias.

Desconozco si existe una forma más fácil de hacerlo, yo utiliza la API ShowWindows

Private Const SW_MAXIMIZE = 3
Private Const SW_MINIMIZE = 6
Private Const SW_RESTORE = 9

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Private Sub Command1_Click()
ShowWindow Me.hwnd, SW_MAXIMIZE
End Sub

Private Sub Command2_Click()
ShowWindow Me.hwnd, SW_MINIMIZE
End Sub