Function AddControl( _
   ByVal Name As String, _
   ByVal ControlName As String, _
   ByVal BstrLicKey As String _
) As Object

Dim instance As IModelViewManager
Dim Name As String
Dim ControlName As String
Dim BstrLicKey As String
Dim value As Object
 
value = instance.AddControl(Name, ControlName, BstrLicKey)

object AddControl( 
   string Name,
   string ControlName,
   string BstrLicKey
)

Object^ AddControl( 
&   String^ Name,
&   String^ ControlName,
&   String^ BstrLicKey
) 

Parameters

Name

User-defined label that appears on the tab

ControlName

Name or class ID for the ActiveX control

BstrLicKey

Optional license key; this data is needed to create ActiveX controls that require a runtime license key; if the ActiveX control supports licensing, then provide a license key for the creation of the ActiveX control; default value is NULL

Return Value

Pointer to the new ActiveX control

If your ActiveX control needs tab traversal support, then use IModelViewManager::AddControl3.

This method sets the class ID and license key information for the ActiveX control when the API PropertyManager page is shown and the ActiveX control is created. The controlName argument can be either the name of the control (ProgID) or the class ID (CLSID), for example, "MSCAL.calendar" or "{8E27C92B-1264-101C-8A2F-040224009C02}". Both provide the calendar protocol. You can obtain these strings using a combination of the Microsoft OLE/COM Object Viewer and the registry editor.

For example:

' ProgID

bRet = m_pActiveXControl.SetClass("MSCAL.Calendar", "")

bRet = m_pActiveXControl2.SetClass("MSComctlLib.ListViewCtrl", "")

' CLSID

bRet = m_pActiveXControl.SetClass("{8E27C92B-1264-101C-8A2F-040224009C02}", "")

bRet = m_pActiveXControl2.SetClass("{BDD1F04B-858B-11D1-B16A-00C0F0283628}", "")

To delete a tab created by this method, use IModelViewManager::DeleteControlTab.

See also Keystrokes and Accelerator Keys in ActiveX Modeless Dialogs and PropertyManager Pages.