Turinys

• Instrukcijos

„Visual Basic“ pažangos juostos valdymas suteikia vaizdinę tam tikros programos funkcijos pažangą. Pridėjus progreso juostą šablonui, nustatykite minimalias ir maksimalias reikšmes bei jų pradinę vertę. Didžiausia reikšmė labai priklauso nuo to, ko jums reikia, kad būtų galima stebėti juostą, ji gali būti tokia maža kaip naudotojo pažanga viktorinos programoje arba skaityti tūkstančius teksto failo eilučių. Nepriklausomai nuo tikslo, atnaujinimo būdas išlieka tas pats.

Instrukcijos

Naudokite „Visual Basic“ „ProgressBar“, kad parodytumėte naudotojams, kiek jie yra tam tikroje užduotyje (Stockbyte / Stockbyte / Getty Images)

1. Atidarykite „Visual Basic“ projektą. Dukart spustelėkite parinktį „Progress Bar“ įrankių juostoje, kad pridėtumėte formą „ProgressBar1“. Dukart spustelėkite mygtuką „Mygtukas“, kad pridėtumėte parinktį „Mygtukas1“.

2. Paspauskite „F7“, kad atidarytumėte kodo langą. Atidarykite „Form1_Load“ ir įveskite komandą:

   ProgressBar1.Minimum = 0 ProgressBar1.Maximum = 5 ProgressBar1.Value = 0

   Šis kodas nustato pradines progreso kintamojo reikšmes, taip pat mažiausios, maksimalios ir dabartinės slankiklio reikšmes. Galite nustatyti kitą maksimalią vertę, priklausomai nuo išteklių tikslo.

3. Atidarykite komandą „Button1_Click“ ir įveskite:

   Jei ProgressBar1.Value <ProgressBar1.Maximum Tad ProgressBar1.Value + = 1 Jei ProgressBar1.Value = ProgressBar1.Maximum Tada MsgBox ("Done!") Pabaiga, jei baigsite Jei

   
   

   Kai vartotojas spustelės mygtuką, šis kodas patikrina, ar progreso juosta yra mažesnė už maksimalią vertę. Jei taip, ji padidina vertę vienu vienetu, todėl ji turi didesnę išvadą. Tada yra naujas patikrinimas, kad pamatytumėte, ar vertė pasiekė maksimalų dydį. Tokiu būdu, kai progreso juosta pasiekia maksimalų dydį, jūs negalite dar labiau padidinti vertės ir tai neleis pasiekti pasiekimo klaidos.