infoMessage=[[By showing this message the script
will pause (script real sleep) and the
graphical interface will get updated,
now the font color is red
and the checkbox is checked.]]

labelFont=control_getFont(CETrainer_CELabel)

function CEButtonClick(sender)
  font_setColor(labelFont, 0x0000ff)
  checkbox_setState(CETrainer_CECheckbox, cbChecked)
    --control_setEnabled(CETrainer_CECheckbox, false) --uncoment this two lines to update
    --control_setEnabled(CETrainer_CECheckbox, true)   --the checkbox current state
    --showMessage(infoMessage) --uncoment this to update the font color and the checkbox state
  sleep(4000)
  checkbox_setState(CETrainer_CECheckbox, cbUnchecked)
  font_setColor(labelFont, 0x000000)
end