Visual Basic specifies a Boolean’s default values as zero for False and -1 for True. You may save and set the value of a check box, based on the absolute value of a Boolean variable, as these correspond to the intrinsic constants vbUnchecked and vbChecked:
Dim bBool as BooleanbBool = True'//If bBool = 0 the checkbox will be '//unchecked, if it is anything else it will '//be checked.Check1.Value = Abs(bBool)