Barra De Progresso

[alexandremanowar]

E aí pessoal.

Eu gostaria de aprender a criar barra de progresso enquanto uma determinada função é executada, nunca usei isso e gostaria que alguém me explique como fazer isso.

A idéia é a seguinte, eu fiz um form e nele tem um determinado botão que quando eu clicar nele ele vai fazer alguns inserts e selects no banco. Eu quero que enquanto estiver sendo executada essas funções fique uma barra de progresso enchendo.

Tipo cliequei no botão e aparece uma caixa acima do form com a palavra aguarde e abaixo dela da mensagem fique a barra de progresso enchendo. Quando a função do botão acabar a barra finalisa e a caixa some deixando o formulário livre para uso denovo.

Nunca usei isso não idéia de como fazer. Alguém pode me explicar?

Obrigado.

[Graymalkin]

Para entender o funcionamento de uma barra de progresso, dê uma lida neste post: http://scriptbrasil.com.br/forum/index.php...ost&p=68304

Abraços,

Graymalkin

[alexandremanowar]

Valeu pelo link Graymalkin !

Eu estudei ele e entendi o seguinte que em um caso igual ao meu que ele vai fazer uma conexão e armazenar algumas funções e depois fechar a conexão eu devo usar algo como esse código que você postou:

ProgressBar1.Max = 3
ProgressBar1.Value = 0
For i = 1 To 3
   ProgressBar1.Value = i
   Sleep 1000
Next i

Mas ainda não entendi bem como usar, pelo que eu li no post que você deixou existem casos em que posso manipular a barra mas existem casos que não. Meu caso é básico, tenho um botão que ao clicar ele abre o banco de dados e armazena algumas funçoes e depois termina e fecha o banco e pronto esta executado. Nesse caso durante esse processo preciso que abra um tipo de janelinha com a palavra "Aguarde" e fique enchendo a barra quando a função acabar simplesmente a janela some, mas ainda não entendi como fazer isso.

Um cara deixou um link no post que você me deixou porém não achei nada que me ajude no link dele.

Já procurei mais aqui no fórum mas não achei.

Você poderia me explicar por favor?

[Graymalkin]

Valeu pelo link Graymalkin !

Eu estudei ele e entendi o seguinte que em um caso igual ao meu que ele vai fazer uma conexão e armazenar algumas funções e depois fechar a conexão eu devo usar algo como esse código que você postou:

ProgressBar1.Max = 3
ProgressBar1.Value = 0
For i = 1 To 3
   ProgressBar1.Value = i
   Sleep 1000
Next i

Mas ainda não entendi bem como usar, pelo que eu li no post que você deixou existem casos em que posso manipular a barra mas existem casos que não. Meu caso é básico, tenho um botão que ao clicar ele abre o banco de dados e armazena algumas funçoes e depois termina e fecha o banco e pronto esta executado. Nesse caso durante esse processo preciso que abra um tipo de janelinha com a palavra "Aguarde" e fique enchendo a barra quando a função acabar simplesmente a janela some, mas ainda não entendi como fazer isso. Um cara deixou um link no post que você me deixou porém não achei nada que me ajude no link dele. Já procurei mais aqui no fórum mas não achei. Você poderia me explicar por favor?

Então, você aí mesmo (no seu texto) exemplificou como deve ser:

ProgressBar1.Max = 6 'Máximo de operações (que pode ser variável)
ProgressBar1.Value = 0

'Abre o BD
ProgressBar1.Value = ProgressBar1.Value + 1

'Função 1
ProgressBar1.Value = ProgressBar1.Value + 1

'Função 2
ProgressBar1.Value = ProgressBar1.Value + 1

'Função 3
ProgressBar1.Value = ProgressBar1.Value + 1

...

'Função n
ProgressBar1.Value = ProgressBar1.Value + 1

'Fecha o BD
ProgressBar1.Value = ProgressBar1.Value + 1

Sacou? ;)

Graymalkin