Syntax: Aktueller Wert = Objekt.Steuerelementinhalt [Boolean]
bzw.:Dim objChkBox As SpecialCheckbox3 Set objChkBox = Me!SpecialCheckbox.Object With objChkBox MsgBox .Steuerelementinhalt End With Set objChkBox = NothingMsgBox Me!SpecialCheckbox.Steuerelementinhalt