做了个记事本，加了个右键菜单，但又出现了个系统自带的菜单，怎么屏蔽掉啊？

Question

。

Answer 1

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
        Text1.Enabled = False
        Text1.Enabled = True
        PopupMenu MyMenu'这里改成你自己的菜单
    End If
End Sub

Answer 2

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then
        Text1.Enabled = False
       PopupMenu MyMenu'这里改成你自己的菜单
    
        Text1.Enabled = True
        End If
End Sub