Try:
For X = 1 To 100 Step 1
ProgressBar1.Value = X / 100
ProgressBar1.Refresh
Wait 0.1
Next
Lee
__________
"Artificial Intelligence is no match for natural stupidity."
On 12/17/2014 03:33 PM, Christian e Ana Luiza Britto wrote:
> Hi I'm trying to build a form with a progress bar. I make a simple
> For...Next loop to increment the progress bar value. The problems is
> that the Form only appears on the screen when the loop reach the final
> value. What I have to do to see the working bar progress?
> Christian
>
> Public Sub Form_Show()
> Dim X As Integer
> X = 0
> For X = 1 To 100 Step 1
> ProgressBar1.Value = X / 100
> Wait 1
> Next
> End
>
> ------------------------------------------------------------------------------
> Download BIRT iHub F-Type - The Free Enterprise-Grade BIRT Server
> from Actuate! Instantly Supercharge Your Business Reports and Dashboards
> with Interactivity, Sharing, Native Excel Exports, App Integration & more
> Get technology previously reserved for billion-dollar corporations, FREE
> http://pubads.g.doubleclick.net/gampad/clk?id=164703151&iu=/4140/ostg.clktrk
> _______________________________________________
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
------------------------------------------------------------------------------
Download BIRT iHub F-Type - The Free Enterprise-Grade BIRT Server
from Actuate! Instantly Supercharge Your Business Reports and Dashboards
with Interactivity, Sharing, Native Excel Exports, App Integration & more
Get technology previously reserved for billion-dollar corporations, FREE
http://pubads.g.doubleclick.net/gampad/clk?id=164703151&iu=/4140/ostg.clktrk
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
