Crear Teclas de Acceso Dinámicamente
Arrastrar el control MenuStrip al Form y luego agregar el item Archivo y debajo Abrir.

En el constructor de la clase Form1 usar la propiedad ShortcutKeys del objeto AbrirToolStripMenuItem y agregar la enumeración Keys los valores Control y E. Registrar el evento Click y mostrar en un MsgBox el texto abrir.
Public Class Form1
Public Sub New()
InitializeComponent()
AbrirAToolStripMenuItem.ShortcutKeys = Keys.Control Or Keys.E
End Sub
Private Sub AbrirToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles AbrirToolStripMenuItem.Click
MsgBox("Abrir")
End Sub
End ClassInicie la depuración y cuando aparezca el Form presione la tecla Ctrl y sin soltar presione la tecla E. Se Abrirá un caja de mensaje con el texto Abrir.
No hay comentarios:
Publicar un comentario