guille
03 de Febrero del 2006

Hola
¿Cómo puedo anular el menú(el de copiar, pegar etc..) que sale por ejemplo en un Textbox al pulsar con el botón derecho del ratón?
Lo he intentado desde MouseDown y MouseUp poniendo el valor Button=0 pero sigue saliendo el menú.
Gracias

Rosa
03 de Febrero del 2006

Hola con este codigo puedes eliminar el menú contextual que aparece por defecto para que aparezca uno personalizado:

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

If Button = vbRightButton Then
Text1.Enabled = False
Text1.Enabled = True
Text1.SetFocus
PopupMenu MiMenu
End If

End Sub