[Gambas-user] Progress Bar

[T Lee Davidson]

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 at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>