ProgresiveBar

[mestre fyoda 1]

como eu faço uma progressive bar diacordo com que vai ser carregado e tambem tem que mostrar a porcentagem , como eu faço ?

[Luizgrs 0]

Para usar o componente progressbar, você precisa saber a quantidade final que deve ser carregada.Tendo isso você consegue montar a porcentagem e exibi-la em um label.O componente você usa assim: na propriedade min você coloca o valor inicial e na max a final. Depois a cada um que vai carregando você vai modificando a propriedade value.

[Jattobá 0]

Dim x As Integer 'PROGRESSBAR    x = 0        ProgressAnalise.Min = 0    ProgressAnalise.Max = Val(TextQtd)    ProgressAnalise.Enabled = True    ProgressAnalise.Visible = True        For I = CDate(txtDE.Text) To (CDate(txtATE.Text))        '------------------------------        x = x + 1        ProgressAnalise.value = x        '------------------------------    Next