Ho fatto una cosa.
Su un form ho messo un menù invisibile mFile con un sottomenù mProva e tra le proprietà del Form ho impostato su True KeyPreview.
A questo punto nel codice ho scritto questo:
codice:
Private Sub Form_MouseDown(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
PopupMenu mFile
End If
End Sub
Private Sub mProva_Click()
MsgBox "Cliccato sul menu' col tasto sinistro"
End Sub
uso solo il tasto sinistro sia per far apparire il menù che per selezionare la voce del menù stesso.
Non so se ti piace, vedi un po' tu