'Declaration
Function GetEditorControl( _
ByVal As Control, _
ByVal As Appearance, _
ByVal As Single _
) As Control
'使用法
Dim instance As IReuseEditorControl
Dim parent As Control
Dim appearance As Appearance
Dim zoomFactor As Single
Dim value As Control
value = instance.GetEditorControl(parent, appearance, zoomFactor)