Export (0) Print
Expand All
Expand Minimize

ControlGUID Property

Visual Studio .NET 2003

Sets or returns the GUID for the selected ActiveX reference.

[Visual Basic .NET]
Public Property ControlGUID() As String
[Visual Basic 6]
Property Get ControlGUID() As String
Property Let ControlGUID( _
   ByVal NewValue As String _
) 
[C++]
HRESULT __stdcall get_ControlGUID(
   /* [out, retval] */ BSTR* retVal
);
HRESULT __stdcall put_ControlGUID(
   /* [in] */ BSTR NewValue
);
[C#]
public string ControlGUID {get; set;}
[JScript .NET]
public function get ControlGUID() : String
public function set ControlGUID(
   NewValue : String
)

Parameters

NewValue
The new GUID value for the selected ActiveX reference.

Return Value

Returns the GUID value for the selected ActiveX reference.

Remarks

Although this property is settable, you should not do so. It is settable only for internal purposes.

Example

Loops through each project in your solution and lists the GUID of each ActiveX (COM) control.

' Add a reference to Microsoft.VisualStudio.VCProjectEngine and have a 
' Visual C++ .NET project loaded before running this example. Also, you 
' should have at least one ActiveX (COM) reference in a project.
Imports EnvDTE
Imports Microsoft.VisualStudio.VCProjectEngine

Public Module Module1
    Sub Test()
        Dim proj As Project
        Dim vcproj As VCProject
        Dim ref As VCReference
        Dim axref As VCActiveXReference
     
        On Error Resume Next

        ' Loop each project in the solution
        For Each proj In DTE.Solution.Projects
            vcproj = Nothing
            vcproj = CType(proj.Object, VCProject)
            ' If this project is a Visual C++.NET project
            If Not vcproj Is Nothing Then
                ' Loop the references for this Visual C++.NET project
                For Each ref In vcproj.VCReferences
                    axref = Nothing
                    axref = CType(ref, VCActiveXReference)
                    ' If this reference is an ActiveX reference
                    If Not axref Is Nothing Then
                        MsgBox("Control GUID: " & axref.ControlGUID)
                    End If
                Next
            End If
        Next
    End Sub
End Module

See Samples for Visual C++ Code Model Extensibility for information on how to compile and run this sample.

See Also

ControlFullPath Property | ControlLocale Property | ControlVersion Property

Applies To: VCActiveXReference Object

Show:
© 2015 Microsoft