Freigeben über


VCActiveXReference.ControlLocale-Eigenschaft

Ruft das Gebietsschema für den ausgewählten ActiveX-Verweis ab.

Namespace:  Microsoft.VisualStudio.VCProjectEngine
Assembly:  Microsoft.VisualStudio.VCProjectEngine (in Microsoft.VisualStudio.VCProjectEngine.dll)

Syntax

'Declaration
ReadOnly Property ControlLocale As Integer
int ControlLocale { get; }
property int ControlLocale {
    int get ();
}
abstract ControlLocale : int with get
function get ControlLocale () : int

Eigenschaftswert

Typ: Int32
Eine ganze oder long Zahl (abhängig von der Programmiersprache), das den Gebietsschemawert der ausgewählten ActiveX-Referenz darstellt.

Hinweise

Informationen zum Kompilieren und Ausführen dieses Beispiels finden Sie unter Gewusst wie: Kompilieren von Beispielcode für die Erweiterbarkeit des Visual C++-Codemodells.

Beispiele

[Visual Basic]

Schleifen durch jedes Projekt in der Lösung und in Listen, die die Gebietsschema-ID jedem von ActiveX (COM) steuern.

' Add a reference to Microsoft.VisualStudio.VCProjectEngine and have a 
' Visual C++ 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++ project.
            If Not vcproj Is Nothing Then
                ' Loop the references for this Visual C++ 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 locale: " & axref.ControlLocale)
                    End If
                Next
            End If
        Next
    End Sub
End Module

.NET Framework-Sicherheit

Siehe auch

Referenz

VCActiveXReference Schnittstelle

Microsoft.VisualStudio.VCProjectEngine-Namespace