¿Cómo puedo crear un botón de barra de herramientas utilizando Visual Basic?

Un control de barra de herramientas en una aplicación de Visual Basic puede simplificar las tareas para el usuario si la aplicación tiene muchas funciones. Crear barras de herramientas utilizando el "ToolBarButton Clase" en Visual Basic y añadir texto o imágenes para los botones para una mayor claridad. Después de agregar los botones, crear un evento de clic que se ejecuta el código apropiado cuando se hace clic en él. botones de la barra le dan al usuario una forma rápida de realizar funciones comunes como abrir, guardar o imprimir un archivo.

Instrucciones

1 Lanzamiento de Microsoft Visual Basic Express, haga clic en el menú "Archivo" y seleccionar "Nuevo proyecto" para mostrar la ventana de diálogo "Nuevo proyecto". Haga doble clic en "Aplicación de Windows Forms" para crear un nuevo proyecto de Windows Forms.

2 Haga clic en el formulario y haga clic en "Ver código" para abrir la ventana de Visual Basic. Haga clic en el cuadro desplegable que muestra "Form1", luego "Form1 Eventos". Desplácese hacia abajo y haga doble clic en "Cargar" en el cuadro desplegable "Declaraciones" a la derecha para crear un procedimiento de "carga" para el formulario.

3 Copia y pega el código siguiente para crear un objeto "Barra de herramientas":

Dim MyToolbar Como nueva barra de herramientas ()

4 Copia y pega el código siguiente para definir el texto que aparece en el botón y agregarlo al objeto "Barra de herramientas":

toolBarBtn.Text = "Botón"

myToolBar.Buttons.Add(toolBarBtn)

Controls.Add (MyToolbar)

5 Copiar y pegar el siguiente código para crear un delegado de controlador de eventos para ejecutar código cuando se hace clic en el botón:

AddHandler myToolBar.ButtonClick, AddressOf Me.myToolBar_ButtonClick

6 Copiar y pegar el siguiente código que se ejecuta cuando se hace clic en el botón de la barra de herramientas:

Private Sub MyToolbar

ButtonClick (remitente de ByVal como objeto,

ByVal e como ToolBarButtonClickEventArgs)

Select Case myToolBar.Buttons.IndexOf(e.Button)

caso 0

MsgBox ( "botón de barra de herramientas se ha hecho clic")

End Select

End Sub

7 Haga clic en el menú "Test", luego "Iniciar depuración" para ejecutar el programa. Haga clic en el botón de la barra para mostrar un cuadro de mensaje que se ha hecho clic en el botón.