Create popup menu

Task Create popup menu

First, you must create an menu in menu editor (Tool >> menu editor or press Ctrl + E)

For Example :
Caption : File
Name : mnFile

CODE

'For making an Popupmenu action

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then

PopupMenu mnFile

End If

End Sub

Private Sub mnFile_Click()
MsgBox "This is Popupmenu", vbInformation, "Info"

End Sub