在ListView控件中如何实现按右键显示菜单？

Question

Private Sub listView1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView1.MouseDown
        Select Case e.Button
            Case MouseButtons.Left
            Case MouseButtons.Right
                showcontextmenu()
                ListView1.ContextMenu = ContextMenu1
        End Select
End Sub  
Private Sub showcontextmenu()
        ContextMenu1.MenuItems.Clear()
        ContextMenu1.MenuItems.Add("显示提示", New System.EventHandler(AddressOf Me.cyy))
End SubPrivate Sub cyy(ByVal sender As Object, ByVal e As System.EventArgs)
        MessageBox.Show("热烈欢迎！", "Welcome!", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub