Right Click minimise

Is it possible to minimise a form by right clicking the mouse button over the form?

Hello,

You sure can:

Code:

---

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
 
' check for the right mouse button
  If Button = 2 Then
    ' set the forms windowstate to minimize
    Form1.WindowState = 1
  End If
 
End Sub

---

Hope this helps