CHARACTER label="There have been no clicks yet"

    DO count = 1, 1E100 ! "forever"
      DLG(Button="Click me", Width=3, TItle=label) ! Width=3 to display full length label
      label = "Clicked " // count // "time(s)"
    ENDDO

 END