Enkelte programmer ganske enkelt laste når du starter dem . Annet laste med stil . Du kan lage dine Visual Basic-programmer skiller seg ut fra den digitale publikum ved å legge til en tilpasset lasting bar til programmets oppstart skjema . Du vil ikke finne en lasting bar i Visual Studio verktøykasse , men du vil finne komponentene du kan bruke til å bygge en. Bare dra noen kontroller på skjemaet , finpusse sine farger og imponere dine brukere med en kul animert lasting bar som hilser dem når de lanserer søknaden din . Instruksjoner , Legg Controls å danne
en
Launch Visual Studio og åpne en av Visual Basic.NET prosjekter. Åpne Solution Explorer som inneholder prosjektets filer hvis det ikke er åpent .
2
Finn ikonet for prosjektets oppstart form i Solution Explorer . Dobbeltklikk på dette ikonet. Visual Studio åpner utformingen vinduet og viser form .
3
Åpne verktøykassen og dra en " GroupBox " kontroll på skjemaet . Tilbake til verktøykassen og dra en " ProgressBar " kontroll inn i gruppen boksen du har lagt til i skjemaet.
4
Tilbake til verktøykassen og dra en "Label " kontroll på skjemaet . Klikk denne etiketten og dra den over fremdriftslinjen du har lagt til i skjemaet . Plasser etiketten og fremgang bar slik at venstre kant justeres .
5
Tilbake til verktøykassen en siste gang , og dra en "Timer " kontroll på skjemaet . Lukk verktøykasse.
Legg Programmering Logic
6
Klikk timer som du har lagt til i skjemaet , og trykk " F4 " for å åpne "Properties " vinduet . Klikk på "Hendelser "-ikonet øverst i vinduet for å vise en liste over hendelser .
7
Dobbeltklikk på " Tick " hendelse . Visual Studio åpner koden vinduet og viser de " Timer1_Tick " sub. Denne sub kjører hver gang timeren flått
8
Lim inn følgende kode i kroppen av at sub : .
LoadingBarValue + = økning
p Hvis loadingBarValue > 100 deretter
loadingBarValue = 100
Timer1.Stop ( )
GroupBox1.Visible = False
End If
ProgressBar1.Value = loadingBarValue
den endelige uttalelsen fører til fremgang bar visuelle indikatoren for å flytte med verdien som er lagret i variabelen som heter " loadingBarValue . " Den variabelen - satt til null når skjemaet last - øker med verdien som er lagret i " trinn " variable . Siden verdien av " økning " er en , øker verdien av " loadingBarValue " av en hver gang de " Load " sub runs . Når fremdriftsindikatoren verdi når den maksimale verdien av 100 , stopper timeren. Gruppen boksen som inneholder fremgang bar og etiketten forsvinner automatisk.
9
Trykk " F7 " for å gå tilbake til utformingsvisning og dobbeltklikk på skjemaets tittellinjen . Visual Studio åpner koden vinduet igjen og viser skjemaets " Load " sub. Lim inn følgende kode i kroppen til at sub : en
loadingBarValue = 0
Timer1.Interval = 200
trinn = 1
GroupBox1.Text = " "
Label1.Text = " Laster "
Label1.BackColor = Color.Transparent
Label1.ForeColor = Color.Green
Timer1.Start ( )
den første setningen initialiseres " LoadingBarValue " til null. Den andre setningen angir antall millisekunder timeren pauser mellom klikkene . Denne verdien er 200 i dette eksempelet. Å gjøre dette nummeret større gjør lasting animasjon flytte tregere. Den " tilvekst " variabel bestemmer hvor langt fremdriftslinjen beveger seg når timeren flått . At verdien er en . Å gjøre denne verdien større gjør lasting animasjon flytte raskere. Endre ordet " Loading " til noe du liker eller la standardverdien. De to neste linjene kontrollere etiketten bakgrunn og forgrunn farger. Endre disse verdiene til noen farger du liker eller la dem som " Transparent" og "Grønn ". Den endelige uttalelsen starter timeren .
10
Flytt til toppen av koden vinduet og finn "Class" erklæringen. Lim disse to utsagnene nedenfor erklæringen : en
Dim loadingBarValue
Dim tilveksten
Disse to utsagnene definere " loadingBarValue " og " tilvekst " variablene er beskrevet i forrige trinn < . br >
11
Trykk " F5 " for å kjøre prosjektet . Fremdriftslinjen - som ser ut som en lasting bar - vises. Etiketten inneholder teksten du angir for etiketten vises over søylen. En animert grønne linjen beveger seg sakte fra venstre til høyre på linjen til den når enden av baren . Når det skjer, etiketten og bar forsvinne.