[Gambas-user] Progress Bar

Christian e Ana Luiza Britto chriseana at ...626...
Wed Dec 17 21:33:21 CET 2014


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




More information about the User mailing list