Как да програмирате лента за напредъка на VB.net

Използвайте класа ProgressBar в Visual Basic, за да покажете на потребителите колко са напреднали в дадена задача.

Стъпка 1

Отворете проект на Visual Basic. Щракнете двукратно върху контролния бутон в лентата с инструменти, за да добавите "ProgressBar1" към формуляра. Щракнете двукратно върху контрола "Бутон", за да добавите контрола "Button1" към формуляра.

Стъпка 2

Натиснете "F7", за да отворите прозореца с кодове. Отворете подпрограмата "Form1_Load" и напишете следното:

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

Този код задава началните стойности на променливата на прогреса, както и минималните и максималните стойности на лентата за прогрес. Можете да зададете различна максимална стойност, в зависимост от това, от което се нуждаете лентата за изпълнение за.

Стъпка 3

Отворете подпрограмата "Button1_Click" и напишете следното:

Ако ProgressBar1.Value <ProgressBar1.Maximum Тогава ProgressBar1.Value + = 1 Ако ProgressBar1.Value = ProgressBar1.Maximum Тогава MsgBox ("Finished!") Край, ако End Ако

Когато потребителят кликне върху бутона, кодът проверява дали лентата за изпълнение е по-малка от максималната стойност. Ако е така, увеличете стойността с една, като накарате лентата за прогрес във формата да покаже и увеличение. След това проверете отново, ако стойността е достигнала максимума. По този начин, когато лентата за напредъка достигне максимума, не можете да увеличите стойността повече и следователно да избегнете грешка извън обхвата.