'DeclarationProtected Overrides NotOverridable Function OnCreateAutomationPeer() As AutomationPeer
'UsageDim instance As Zoombox Dim value As AutomationPeer value = instance.OnCreateAutomationPeer()
protected override AutomationPeer OnCreateAutomationPeer()