Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako môžem vytvoriť Toolbar Button pomocou jazyka Visual Basic ?

Kontrolný panel nástrojov v aplikácii Visual Basic môže zjednodušiť úlohy pre používateľa v prípade , že aplikácia má mnoho funkcií . Vytvorenie panelov nástrojov pomocou " ToolBarButton Class " v jazyku Visual Basic a pridať text alebo obrázky s tlačidlami pre väčšiu prehľadnosť . Po pridaní tlačidiel , vytvorte udalosť click , ktorý vykoná správne kódu , keď je to klikol . Tlačidlá na paneli nástrojov poskytuje užívateľovi rýchly spôsob , ako vykonávať bežné funkcie , ako je otvorenie , uloženie alebo tlač súboru . Pokyny dovolená 1

Spustite program Microsoft Visual Basic Express , kliknite na ponuku " Súbor " a vyberte " Nový projekt " , zobrazí sa dialógové okno " New Project " . Double - kliknite na " Windows Forms aplikácie " pre vytvorenie nového projektu model Windows Forms .
2

pravým tlačidlom myši na formulár a kliknite na tlačidlo " Zobraziť kód " otvorte Visual Basic okno . Kliknite na rozbaľovací zoznam zobrazujúci " Form1 " , potom " Form1 udalosti . " Prejdite nadol a dvakrát kliknite na " Load " z " deklaráciou " drop - box dole vpravo vytvoriť postup " Load " pre formu .
3

Skopírujte a vložte nasledujúci kód pre vytvorenie "toolbar " objekt :

Dim myToolBar ako nový panel nástrojov ( )
4

skopírujte a vložte nasledujúci kód definovať text zobrazený na tlačidle a pridajte ho do " Panel nástrojov " objekt :

toolBarBtn.Text = " Button "

myToolBar.Buttons.Add ( toolBarBtn )

Controls.Add ( myToolBar )

5

skopírujte a vložte nasledujúci kód na vytvorenie udalosti popisovač delegáta spustenie kódu pri kliknutí na tlačidlo :

AddHandler myToolBar.ButtonClick , AddressOf Me.myToolBar_ButtonClick
6

skopírujte a vložte nasledujúci kód spustiť , keď je tlačidlo na paneli nástrojov klepli :

Private Sub myToolBar_ButtonClick ( byVal sender As Object , _ byval e

Ako ToolBarButtonClickEventArgs )

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

Case 0

MsgBox ( " tlačidlo panela nástrojov klepli " )

End Select

konca sub
7

Kliknite na menu " Debug " , potom " Start Debugging " na spustenie programu . Kliknite na tlačidlo panela nástrojov sa zobrazí okno so správou , že tlačidlo bolo kliknuté .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené