在以下事件过程中，可以在用户按下鼠标右键时，显示一个上边框，以鼠标当前位置为心的弹出

问题：

在以下事件过程中，可以在用户按下鼠标右键时，显示一个上边框，以鼠标当前位置为心的弹出式菜单，而且这个弹出式菜单还可以识别右键对菜单命令的选择，相应的选项是()。

A． Private Sub Form _ Mouse Up(Button As Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　　X As Single，Y As Single)　　　　If Button=2 Then　　　　　　PopupMenu mnuEdit，vbPopupMenuCenterAlign Or_　　　　　　　　vbPopupMenuRightButton，X，Y，mnuEditOpen　　　　End If　　End Sub

B． Private Sub Form _ MouseUp(Button AS Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　X As Single，Y As Single)　　　　If Button=2 Then　　　　　　PopupMenu mnuEdit，　　　　End If　　End Sub

C． Private Sub Form _ MouseUp(Button AS Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　X As Single，Y As Single)　　　　PopupMenu mnuEdit，vbPopupMenuCenterAlign Or_　　　　　　　　　　　vbPopupMenuRightButton　　End Sub

D． Private SUb Form _ MouseUp(Button AS Integer，_　　　　　　　　　　　　　　　　Shift As Integer，X As Single，Y As Single)　　　　If Button=2 Then　　　　　　　　　PopupMenu mnuEdit，2　　　　End If　　End Sub