set progressbar = XSIUIToolkit.ProgressBar
progressbar.Maximum = 1000 
for i = progressbar.Minimum to progressbar.Maximum
	' If the user has pressed cancel then exit the loop
	if progressbar.CancelPressed then
		exit for
	end if
	' Otherwise increment
	progressbar.Increment 1		
next