共用方式為


VCActiveXReference.ControlVersion 屬性

取得所選 ActiveX 參考的版本。

命名空間:  Microsoft.VisualStudio.VCProjectEngine
組件:  Microsoft.VisualStudio.VCProjectEngine (在 Microsoft.VisualStudio.VCProjectEngine.dll 中)

語法

'宣告
ReadOnly Property ControlVersion As String
string ControlVersion { get; }
property String^ ControlVersion {
    String^ get ();
}
abstract ControlVersion : string with get
function get ControlVersion () : String

屬性值

型別:System.String
字串,表示選定 ActiveX 參考的版本號碼。

備註

如需如何編譯與執行此範例的詳細資訊,請參閱HOW TO:編譯 Visual C++ 程式碼模型擴充性的範例程式碼

範例

[Visual Basic]

迴圈將版本號碼每 ActiveX 的方案和清單中的每個專案 (COM) 控制項。

' 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 version: " & axref.ControlVersion)
                    End If
                Next
            End If
        Next
    End Sub
End Module

.NET Framework 安全性

請參閱

參考

VCActiveXReference 介面

Microsoft.VisualStudio.VCProjectEngine 命名空間