? Une commande de barre d'outils dans une application Visual Basic peut simplifier les tâches pour l'utilisateur si l'application possède de nombreuses fonctions. Créer des barres d'outils en utilisant le " ToolBarButton classe " dans le texte de base et add visuelle ou images pour les boutons pour plus de clarté . Après avoir ajouté les boutons , créer un événement de clic qui exécute le code approprié quand il est cliqué. La barre d'outils donnent à l'utilisateur un moyen rapide pour exécuter des fonctions courantes telles que l'ouverture , l'enregistrement ou l'impression d'un fichier . Instructions
1
Lancement de Microsoft Visual Basic Express, cliquez sur le menu "Fichier" et sélectionner "Nouveau projet" pour afficher la fenêtre de dialogue «Nouveau projet» . Double-cliquez sur "Application Windows Forms " pour créer un nouveau projet Windows Forms .
2
clic droit sur le formulaire et cliquez sur " Afficher le code " pour ouvrir la fenêtre Visual Basic. Cliquez sur le menu déroulant montrant " Form1 ", puis " Form1 Events. " Faites défiler la liste et double-cliquez sur "Load " des " déclarations " de la boîte déroulante à droite pour créer une procédure de " Load" pour la forme .
3
Copiez et collez ce qui suit code pour créer un objet "Barre d'outils ":
Dim myToolBar Comme nouvelle barre d'outils ()
4
Copiez et collez le code suivant pour définir le texte affiché sur le bouton et l'ajouter à l'objet "Barre d'outils ":
toolBarBtn.Text = "Button"
myToolBar.Buttons.Add ( toolBarBtn )
Controls.Add ( myToolBar )
< br > 5
Copiez et collez le code suivant pour créer un délégué de gestionnaire d'événements pour exécuter du code lorsque le bouton est cliqué:
AddHandler myToolBar.ButtonClick , AddressOf Me.myToolBar_ButtonClick
6 < p > Copier et coller le code suivant à exécuter lorsque le bouton de la barre d'outils est cliqué:
Private Sub myToolBar_ButtonClick ( sender As Object , _
ByVal e As ToolBarButtonClickEventArgs )
Select Case myToolBar.Buttons.IndexOf ( e.Button )
Case 0
MsgBox (" Toolbar bouton a été cliqué " )
End Select
Fin sous
7
Cliquez sur le menu "Debug ", puis " Démarrer le débogage " pour exécuter le programme . Cliquez sur le bouton barre d'outils pour afficher une boîte de message que le bouton a été cliqué .