Jak zaprogramować pasek postępu na VB.net
Krok 1
Otwórz projekt Visual Basic. Dwukrotnie kliknij kontrolkę na pasku postępu na pasku narzędzi, aby dodać do formularza "ProgressBar1". Dwukrotnie kliknij na przycisk "Button", aby dodać formant "Button1" do formularza.
Krok 2
Naciśnij "F7", aby otworzyć okno kodu. Otwórz podprogram "Form1_Load" i napisz:
ProgressBar1.Minimum = 0 ProgressBar1.Maximum = 5 ProgressBar1.Value = 0
Ten kod ustawia początkowe wartości zmiennej postępu, a także minimalne i maksymalne wartości paska postępu. Możesz ustawić inną maksymalną wartość, w zależności od tego, do czego potrzebujesz paska postępu.
Krok 3
Otwórz podprogram "Button1_Click" i wpisz:
Jeśli ProgressBar1.Value <ProgressBar1.Maximum Then ProgressBar1.Value + = 1 If ProgressBar1.Value = ProgressBar1.Maximum Then MsgBox ("Finished!") End If End If
Kiedy użytkownik kliknie przycisk, kod sprawdza, czy pasek postępu jest mniejszy niż wartość maksymalna. Jeśli tak, zwiększ wartość o jeden, powodując, że pasek postępu w formularzu również pokazuje wzrost. Następnie sprawdź ponownie, czy wartość osiągnęła maksimum. W ten sposób, gdy pasek postępu osiągnie maksimum, nie można zwiększyć wartości więcej, a tym samym uniknąć błędu poza zakresem.