Cómo crear un menú emergente usando vb

Método PopupMenu

Se utiliza para mostrar un menú emergente en la posición actual del mouse o en la posición de coordenadas especificada en el MDIForm o el objeto Form. Los parámetros con nombre no son compatibles.

Sintaxis

object.PopupMenu menuname, flags, x, y, negritacommand

La sintaxis del método PopupMenu contiene las siguientes partes:

Descripción de la pieza

objeto Opcional. Una expresión de objeto cuyo valor se "aplica a" un objeto de la lista. Si se omite el objeto, el objeto de formulario enfocado por defecto es objeto.

Nombre del menú Obligatorio. El nombre del menú emergente que se mostrará. El menú especificado debe contener al menos un submenú.

Banderas Opcionales. Un valor numérico o constante que especifica la posición y el comportamiento del menú emergente, como se describe en las siguientes configuraciones.

X Opcional. Especifica la coordenada x en la que mostrar el menú emergente. Si se omite este parámetro, se utilizan las coordenadas del mouse.

Y Opcional. Especifica la coordenada y del menú emergente. Si se omite este parámetro, se utilizan las coordenadas del mouse.

boldcomando Opcional. Especifica el nombre del control de menú en el menú emergente para mostrar su título de texto en negrita. Si se omite este parámetro, no aparece ningún control en negrita en el menú emergente.

Valores de configuración

Los valores de configuración para la bandera son:

Descripción del valor de posición constante

vbPopupMenuLeftAlign 0 (predeterminado). El lado izquierdo del menú emergente está ubicado en x.

vbPopupMenuCenterAlign 4 Centre el menú emergente en x.

vbPopupMenuRightAlign 8 El lado derecho del menú emergente está ubicado en x.

Valor de comportamiento constante Descripción

vbPopupMenuLeftButton 0 (predeterminado). Los elementos de los menús emergentes responden a los clics del mouse solo cuando se usa el botón izquierdo del mouse.

vbPopupMenuRightButton 2 Los elementos del menú emergente responden a los clics del mouse independientemente de si se usa el botón derecho o izquierdo del mouse.

Explicación

Las constantes anteriores se enumeran en la biblioteca de objetos de Visual Basic (VB) en el Explorador de objetos.

Utilice la propiedad ScaleMode para especificar las unidades de medida para las coordenadas xey. Las coordenadas xey definen dónde aparece el menú emergente en relación con el formulario especificado. Si no incluye las coordenadas xey, el menú emergente se muestra en la posición actual del puntero del mouse.

Cuando se muestra el menú emergente, se llama al código detrás del método PopupMenu hasta que el usuario selecciona un comando del menú (en este momento, se ejecuta el código para el evento Click del comando antes del código después de la instrucción PopupMenu) o Solo se puede ejecutar cuando se cancela el menú. Además, solo se puede mostrar un menú emergente a la vez, por lo que si ya se muestra un menú emergente o hay un menú desplegable abierto, se ignorarán otras llamadas a este método.