How to use a Progressbar


progress.png
' Gambas class file

PUBLIC SUB _new()
  ProgressBar1.value = 0.01
END

PUBLIC SUB Button1_Click()
    ProgressBar1.value = ProgressBar1.value - 0.01
END

PUBLIC SUB Button2_Click()
  ProgressBar1.Reset
END

PUBLIC SUB Button3_Click()
    ProgressBar1.value = ProgressBar1.value + 0.01
END


-- JochenGeorges - 28 Dec 2004