Reference3.RevisionNumber 屬性

發行項
10/31/2012

取得參考的修訂編號。

命名空間： VSLangProj80
組件： VSLangProj80 (在 VSLangProj80.dll 中)

語法

'宣告
ReadOnly Property RevisionNumber As Integer

int RevisionNumber { get; }

property int RevisionNumber {
    int get ();
}

abstract RevisionNumber : int

function get RevisionNumber () : int

屬性值

型別：System.Int32
Long 值。視參考型別而定傳回不同值。

參考型別	傳回值
Assembly	參考的修訂版本號碼：0–9999。
COM	0

備註

參考的版本可以經由四個元件進行唯一識別：major、minor、build 和 revision。major 和 minor 元件都是必要項。沒有定義 build 時，revision 元件是選擇項。COM 物件沒有 revision 和 build 元件。如需詳細資訊，請參閱組件版本控制。

範例

此範例會將組件和 COM 參考加入至開啟的 Visual Basic 或 Visual C# 專案中，然後會顯示其修訂編號。若要將此範例當做增益集來執行，請參閱 HOW TO：編譯和執行 Automation 物件模型程式碼範例。

新增的參考之預設路徑：adodb.dll 為 <installation root>\Program Files\Microsoft.NET\Primary Interop Assemblies，以及 spcommon.dll 為 <installation root>\Program Files\Common Files\SpeechEngines\Microsoft。以這兩個或其他適當的檔案路徑取代範例中的 <file path>。

Imports VSLangProj
Imports VSLangProj2
Imports VSLangProj80
Public Sub OnConnection(ByVal application As Object, _
 ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
 ByRef custom As Array) Implements IDTExtensibility2.OnConnection
    applicationObject = CType(application, DTE2)
    addInInstance = CType(addInInst, AddIn)
    GetRevisionNumber(applicationObject)
End Sub 
Sub GetRevisionNumber(ByVal dte As DTE2)
    Dim aProject As Project
    Dim aVSProject As VSProject2
    aProject = applicationObject.Solution.Projects.Item(1)
    aVSProject = _
    CType(applicationObject.Solution.Projects.Item(1).Object, _
    VSProject2)
    ' Add an Assembly reference and display its minor version.
    Dim newRef As Reference3
    Try
        ' Replace <file path> with an actual file path.
        newRef = CType(aVSProject.References.Add _
        ("<file path>\adodb.dll"), Reference3)
    Catch e As System.Exception
    End Try
    MsgBox("Added an assembly reference, named: " & newRef.Name)
    MsgBox("The revision number of " & newRef.Name & " is " _
    & newRef.RevisionNumber.ToString())
    ' Add a COM reference and display its minor version.
    Try
        ' Replace <file path> with an actual file path.
        newRef = CType(aVSProject.References.Add_
        ("<file path>\spcommon.dll"),_
        Reference3)
    Catch e As System.Exception
    End Try
    MsgBox("Added a COM reference, named: " & newRef.Name)
    MsgBox("The revision number of " & newRef.Name & " is " _
    & newRef.RevisionNumber.ToString())
End Sub

using System.Windows.Forms;
using VSLangProj;
using VSLangProj2;
using VSLangProj80;
public void OnConnection(object application, 
ext_ConnectMode connectMode, object addInInst, ref Array custom)
{
    applicationObject = (DTE2)application;
    addInInstance = (AddIn)addInInst;
    GetRevisionNumber(((DTE2)applicationObject));
}
public void GetRevisionNumber(DTE2 dte)
{
    // The first project is a Visual Basic or C# project.
    VSProject2 vsProject =
((VSProject2)(applicationObject.Solution.Projects.Item(1).Object));
    Reference3 aRef = null;
    // Add an Assembly reference and display its revision number.
    // Replace <file path> with an actual file path.
    aRef = (Reference3)vsProject.References.Add
(@"<file path>\adodb.dll");
    
    MessageBox.Show("Added an Assembly reference, named: " 
+ aRef.Name);
    MessageBox.Show("The revision number of " + aRef.Name + " is " 
+ aRef.RevisionNumber.ToString());
    // Add a COM reference and display its revision number.
    // Replace <file path> with an actual file path.
    aRef = (Reference3)vsProject.References.Add
(@"File path>\spcommon.dll");
    MessageBox.Show("Added a COM reference, named: " + aRef.Name);
MessageBox.Show("The revision number of " + aRef.Name + " is " 
+ aRef.RevisionNumber.ToString());
}