如何在表单中单击右键显示POPMENU

Question

如何在表单中单击右键显示POPMENU
谢谢！

Answer 1

PopupMenu frmPopmenu.PopFile, 1, Image4.Left + Image4.Width, Image4.TopPopFile是frmPopmenu的一个菜单

Answer 2

右键
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
    End If
    
End Sub

Answer 3

private sub Control_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
   if Button=2 then
      PopupMenu FormName.PopupMenuFileName
   end if
end sub