Come posso creare un pulsante Toolbar con Visual Basic?

November 9

Come posso creare un pulsante Toolbar con Visual Basic?


Un controllo della barra degli strumenti in un'applicazione Visual Basic può semplificare le attività per l'utente se l'applicazione ha molte funzioni. Creare barre degli strumenti che utilizzano il "ToolBarButton Class" in Visual Basic e aggiungere testo o immagini ai pulsanti per una maggiore chiarezza. Dopo aver aggiunto i pulsanti, creare un evento click che esegue il codice corretto quando viene cliccato. pulsanti della barra degli strumenti offrono all'utente un modo veloce per eseguire funzioni comuni come l'apertura, salvare o stampare un file.

istruzione

1 Avviare Microsoft Visual Basic Express, fare clic sul menu "File" e selezionare "New Project" per visualizzare la finestra di dialogo "Nuovo progetto". Fare doppio clic su "Applicazione Windows Form" per creare un nuovo progetto Windows Form.

2 Fare clic con il modulo e fare clic su "Visualizza codice" per aprire la finestra di Visual Basic. Fai clic sul menu a tendina che mostra "Form1", quindi "Form1 eventi". Scorrere verso il basso e fare doppio clic su "Carica" ​​dalla casella a discesa "Dichiarazioni" per il diritto di creare una procedura di "Load" per la forma.

3 Copiare e incollare il seguente codice per creare un oggetto "barra degli strumenti":

Dim mytoolbar Come nuova barra degli strumenti ()

4 Copiare e incollare il seguente codice per definire il testo visualizzato sul pulsante e aggiungerlo all'oggetto "Barra degli strumenti":

toolBarBtn.Text = "Button"

myToolBar.Buttons.Add(toolBarBtn)

Controls.Add (mytoolbar)

5 Copiare e incollare il seguente codice per creare un delegato gestore di eventi per eseguire il codice quando viene cliccato il pulsante:

AddHandler myToolBar.ButtonClick, AddressOf Me.myToolBar_ButtonClick

6 Copiare e incollare il seguente codice da eseguire quando il pulsante della barra degli strumenti si fa clic:

Private Sub mytoolbar

ButtonClick (ByVal sender As Object,

ByVal e come ToolBarButtonClickEventArgs)

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

caso 0

MsgBox ( "pulsante Toolbar è stato cliccato")

End Select

End Sub

7 Fare clic sul menu "Debug", quindi "Start Debugging" per eseguire il programma. Fare clic sul pulsante barra degli strumenti per visualizzare una finestra di messaggio che il pulsante è stato cliccato.