Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte projekt aplikácie Visual Basic . Double - kliknite na " progress bar " , ovládanie na paneli nástrojov pridať " ProgressBar1 " do formulára . Dvakrát kliknite na ovládací prvok " tlačidlo " pridať " Button1 " do formulára .
2
Stlačte tlačidlo " F7 " sa otvorí okno kód . Otvorte " Form1_Load " podprogram a zadajte nasledujúci príkaz :
ProgressBar1.Minimum = 0ProgressBar1.Maximum = 5ProgressBar1.Value = 0
Tento kód nastaví predvolené hodnoty pre premenné pokroku , ako aj ako minimálna , maximálna a aktuálne hodnoty pre ukazovateľ priebehu . Môžete nastaviť inú maximálnu hodnotu v závislosti na tom , čo budete potrebovať progress bar pre
3
Otvorte " Button1_Click " podprogram a zadajte nasledujúci príkaz : .
Ak ProgressBar1 . Hodnota < ProgressBar1.Maximum ThenProgressBar1.Value + = 1Pokud ProgressBar1.Value = ProgressBar1.Maximum ThenMsgBox ( " Hotovo ! " ) End IfEnd Ak
Keď používateľ klikne na tlačidlo , tento kód skontroluje , v prípade , že indikátor priebehu je menšia ako maximálna hodnota . Ak áno , zvýši hodnotu o jednu , čo je pokrok bar na formulári pre zobrazenie väčšie dokončenie rovnako . To potom zase kontroluje , či hodnota dosiahla maxima . Týmto spôsobom , keď indikátor priebehu robí dosiahnuť max , nemôžete ďalej zvýšiť hodnotu , a preto je vyhnúť sa out - of - rozsah chyby .