A) Private Sub Form_MouseDown(Button AS Intege, _Shift As Integer, X As Single, Y As Single) If Button=1 And Button=2 Then PopupMenu a1 End If End Sub B) Private Sub Form MouseDown(Button As Integeg_Shift As Integer, X As Single, Y As Single) PopupMenu a1 End Sub C) Private Sub Form MouseDown(Button As Intege_Shift As Integeg, X As Single, Y As Single) If Button=1 Then PopupMenu a1 End If End Sub D) Private Sub Form_MouseDown(Button As Integer, _Shift As Integer, X As Single, Y As Single) If Button=2 Then PopupMenu a1 End If End sub