jak zwolnić szybkość progressbara?

jak zwolnić szybkość progressbara?

Zapewne progressbar robisz za pomocą timera (nie wiem czy da się inaczej, jestem początkującym w VB). Skoro już wstawiłeś timer to wchodzisz w jego parametry (wciskasz na niego i po prawej jest box z ustawieniami), a tam masz interwał. Im większa wartość tym wolniej leci.

W ustawieniach timera masz takie coś jak interval i zmieniasz wartość na jaką tam chcesz

EDIT: o kolega wyżej mnie uprzedził

W ustawieniach timera masz takie coś jak interval i zmieniasz wartość na jaką tam chcesz

a jaki kod dać po wciśnięciu buttona? 

a jaki kod dać po wciśnięciu buttona? 

w sensie aby progressbar ruszył? Jeżeli tak to TImer1.Start()

Na progressbara nakładasz TIMER ustawiasz w nim INTERVAL po czym klikasz na buttton i wpiszujesz w nim Timer1.Start ()

Na progressbara nakładasz TIMER ustawiasz w nim INTERVAL po czym klikasz na buttton i wpiszujesz w nim Timer1.Start ()

Nic się nie dzieje A do timera trzeba dać kod n Progressbar1.Value = 100 ?

Pewnie nie zakodowałeś timera

kod timera

ProgressBar1.Increment(1)        If ProgressBar1.Value = ProgressBar1.Maximum Then            Timer1.Stop()        End If

do timera wklej

ProgressBar1.Increment(1)        If ProgressBar1.Value = ProgressBar1.Maximum Then            Timer1.Stop()

Public Class Form1    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click        Timer1.Start()        ProgressBar1.Value = ProgressBar1.Minimum    End Sub    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick        ProgressBar1.Increment(1)        If ProgressBar1.Value = ProgressBar1.Maximum Then            Timer1.Stop()        End If        If ProgressBar1.Value = 10 Then            Timer1.Interval = 20        End If        If ProgressBar1.Value = 60 Then            Timer1.Interval = 400        End If    End SubEnd Class

Tu masz prosty kod z progressbarem, timerem buttonem

@Up dzięki ale sam se poradziłem

Do zamknięcia ;D

Wystarczyło do buttona dać Timer1.Start

a do timera

        ProgressBar1.Value = ProgressBar1.Value + 1        If ProgressBar1.Value = 100 Then            Timer1.Stop()        End If