Well neither of those sound like Tk to me, so I must join my fellow monks in asking which GUI framework you are using?

BTW, in Tk, you would call the cget method on your Tk::Checkbutton widget and check the return value like this:

if ($checkbutton->cget('-state') eq 'disabled') {
  # the checkbox is currently disabled
}
[download]