Syntax: Objekt.ShowAboutBox
Dim objSwBtn As SwitchingButton3 Set objSwBtn = Me!SwitchingButton.Object With objSwBtn .ShowAboutBox End With Set objSpBtn = Nothing bzw.: Me!SwitchingButton.ShowAboutBox
Dim objSwBtn As SwitchingButton3 Set objSwBtn = Me!SwitchingButton.Object With objSwBtn .ShowAboutBox End With Set objSpBtn = Nothing
Me!SwitchingButton.ShowAboutBox