Syntax: Objekt.Wert = 0 [Long]
Dim objSwBtn As SwitchingButton3 Set objSwBtn = Me!SwitchingButton.Object With objSwBtn MsgBox .Wert End With Set objSwBtn = Nothing bzw.: MsgBox Me!SwitchingButton.Wert
Dim objSwBtn As SwitchingButton3 Set objSwBtn = Me!SwitchingButton.Object With objSwBtn MsgBox .Wert End With Set objSwBtn = Nothing
MsgBox Me!SwitchingButton.Wert