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 .