? Eine Symbolleiste Steuerelement in einer Visual Basic-Anwendung können Aufgaben für den Benutzer zu vereinfachen , wenn die Anwendung hat viele Funktionen . Erstellen Sie Symbolleisten mit dem " ToolBarButton Class" in Visual Basic und fügen Sie Text oder Bilder auf den Tasten für mehr Klarheit . Nachdem Sie die Schaltflächen hinzuzufügen, erstellen Sie ein Click-Ereignis , das den richtigen Code wird ausgeführt, wenn es angeklickt wird. Die Schaltflächen der Symbolleiste geben dem Anwender einen schnellen Weg , um allgemeine Funktionen wie Öffnen, Speichern oder Drucken einer Datei ausführen . Anleitung
1
Starten Sie Microsoft Visual Basic Express, klicken Sie auf das Menü "Datei" und wählen Sie " Neues Projekt ", um die " New Project" Dialog -Fenster anzuzeigen. Doppelklicken Sie auf " Windows Forms Application" , um ein neues Windows Forms-Projekt erstellen.
2
der rechten Maustaste auf das Formular aus und klicken Sie auf " Code anzeigen ", um den Visual Basic -Fenster zu öffnen . Klicken Sie auf das Dropdown-Feld zeigt " Form1 ", dann " Form1 Events . " Blättern Sie nach unten und doppelklicken Sie auf "Laden" aus den " Erklärungen " Drop- Down-Box auf der rechten Seite , um eine "Load "-Verfahren für das Formular erstellen.
3
Kopieren Sie den folgenden Code, um einen "Symbolleiste" Objekt erstellen :
Dim As New EigeneSymbolleiste ToolBar ()
4
Kopieren Sie den folgenden Code , um den Text auf der Schaltfläche angezeigt definieren und fügen Sie es "Symbolleiste " Objekt :
toolBarBtn.Text = "Button"
myToolBar.Buttons.Add ( toolBarBtn )
Controls.Add ( EigeneSymbolleiste )
< br > 5
Kopieren Sie den folgenden Code , um ein Ereignis - Handler Delegierter Code auszuführen, wenn auf die Schaltfläche geklickt erstellen :
AddHandler myToolBar.ButtonClick , AddressOf Me.myToolBar_ButtonClick
6 < p> Kopieren Sie den folgenden Code auszuführen, wenn die Schaltfläche geklickt wird :
private Sub myToolBar_ButtonClick (ByVal sender As Object, _ ByVal e
Wie ToolBarButtonClickEventArgs )
Select Case myToolBar.Buttons.IndexOf ( e.Button )
Fall 0
MsgBox (" Toolbar Schaltfläche geklickt wurde " )
End Select End
Sub
7
Klicken Sie auf das Menü "Test" , dann " Debuggen starten ", um das Programm auszuführen. Klicken Sie auf die Schaltfläche in der Symbolleiste , um eine Nachricht anzuzeigen , dass die Schaltfläche geklickt wurde.