Launch Visual Studio 1 en open een van uw Visual Basic.NET projecten . Open de Solution Explorer dat bestanden van het project bevat als het niet geopend . Kopen van 2

Zoek het pictogram voor opstartformulier uw project in de Solution Explorer . Dubbelklik op dat icoon. Visual Studio opent het ontwerp -venster en toont het formulier .
3

Open de gereedschapskist en sleep een " GroupBox " controle op het formulier . Keer terug naar de toolbox en sleep een " ProgressBar " controle in het groepsvak u hebt toegevoegd aan het formulier .
4

Terug naar de toolbox en sleep een "Label" controle op het formulier . Klik op dat label en sleep deze boven de voortgangsbalk kunt u het formulier toegevoegd . Plaats het etiket en voortgangsbalk zodat hun linker elkaar uitgelijnd .
5

Terug naar de toolbox een laatste keer , en sleep een "Timer " controle op het formulier . Sluit de toolbox .
In Programmeren Logic
6

Klik op de timer die u aan het formulier toegevoegd , en druk op " F4 " om het venster "Eigenschappen " te openen . Klik op het pictogram " Events" aan de bovenkant van dat venster om een ​​lijst met gebeurtenissen weer te geven .
7

Dubbelklik op het " Tick " evenement . Visual Studio opent het venster code en geeft de " Timer1_Tick " sub . Deze sub wordt uitgevoerd wanneer de timertikken
8

Plak de volgende code in het lichaam van die sub : .

LoadingBarValue
= increment

Als loadingBarValue > 100 + dan

loadingBarValue
= 100

Timer1.Stop ( )

GroupBox1.Visible = False

End
Als

ProgressBar1.Value = loadingBarValue

de eindafrekening veroorzaakt visuele indicator van de voortgangsbalk om te bewegen door de waarde opgeslagen in de variabele naam " loadingBarValue . " Die variabele - op nul gezet wanneer uw formulier wordt geladen - stijgt met de waarde die is opgeslagen in de variabele " increment " . Omdat de waarde van " increment " is 1 , de waarde van " loadingBarValue " 1 verhoogt iedere keer de "Load " sub runs . Wanneer de waarde van de balk van de maximale waarde van 100 bereikt, stopt de timer . De groep doos met de voortgangsbalk en het label verdwijnt automatisch .

Druk op " F7 " 9 om terug te keren naar de ontwerpweergave en dubbelklik op het formulier van de titelbalk . Visual Studio opent het venster code nogmaals in en geeft de vorm van de "Load " sub . Plak de volgende code in het lichaam van die sub :

loadingBarValue
= 0

Timer1.Interval
= 200

increment
= 1

GroupBox1.Text = " "

= Label1.Text
" Loading "

Label1.BackColor = Color.Transparent

Label1.ForeColor

Timer1.Start = Color.Green
( ) op

het eerste statement initialiseert de " LoadingBarValue " op nul . De tweede verklaring stelt het aantal milliseconden de timer pauzes tussen klikken . Deze waarde 200 in dit voorbeeld . Waardoor dit getal groter maakt het laden van animatie bewegen langzamer . De variabele " increment " bepaalt hoe ver de voortgangsbalk beweegt wanneer de timer tikken . Die waarde is 1 . Het maken van deze waarde groter maakt het laden animatie bewegen sneller . Verander het woord " laden " om het even wat je wilt of laat de standaardwaarde . De volgende twee regels te controleren achtergrond van het label en de voorgrond. Verander deze waarden om het even welke kleuren je wilt of laat ze als " Transparant " en "Green ". De eindafrekening start de timer .

Move 10 aan de bovenkant van het venster code en zoek de " Class " verklaring . Plak deze twee uitspraken onder die verklaring :

Dim loadingBarValue

Dim Toename

Deze twee verklaringen definiëren de " loadingBarValue " en " increment " variabelen in de vorige stap beschreven < . br >

Druk op " F5 " 11 om het project uit te voeren. De voortgangsbalk - die eruit ziet als een loading bar - verschijnt . Het etiket met de tekst die u voor het label instellen verschijnt boven de bar . Een geanimeerde groene balk beweegt zich langzaam van links naar rechts op de balk tot het einde van de bar bereikt . Als dat gebeurt , het etiket en de bar verdwijnen .