Reference2 – rozhraní
Rozšiřuje Reference rozhraní VSLangProj obor názvů.
Obor názvů: VSLangProj2
Sestavení: VSLangProj2 (v VSLangProj2.dll)
Syntaxe
'Deklarace
<GuidAttribute("4FFF24C5-5644-4A47-A48A-B74C3F1F8FC8")> _
Public Interface Reference2 _
Inherits Reference
[GuidAttribute("4FFF24C5-5644-4A47-A48A-B74C3F1F8FC8")]
public interface Reference2 : Reference
[GuidAttribute(L"4FFF24C5-5644-4A47-A48A-B74C3F1F8FC8")]
public interface class Reference2 : Reference
[<GuidAttribute("4FFF24C5-5644-4A47-A48A-B74C3F1F8FC8")>]
type Reference2 =
interface
interface Reference
end
public interface Reference2 extends Reference
Typ Reference2 zveřejňuje následující členy.
Vlastnosti
Název | Popis | |
---|---|---|
BuildNumber | Získá číslo odkazu na sestavení.Jen pro čtení | |
Collection | Získá kolekci References. | |
ContainingProject | Získá Project obsahující odkaz. | |
CopyLocal | Určuje, zda odkaz je zkopírován do přihrádky místní cesta. | |
Culture | Získá řetězec jazykové verze odkazu.Jen pro čtení | |
Description | Získá textový popis odkazu.Jen pro čtení | |
DTE | Získá objekt nejvyšší úrovně rozšiřitelnosti. | |
Extender | Požadovaný objekt zařízení Extender vrátí, pokud je k dispozici pro tento objekt. | |
ExtenderCATID | Zařízení Extender kategorie ID (CATID) získá objektu. | |
ExtenderNames | Získá seznam dostupných zařízení Extender pro objekt. | |
Identity | Získá jedinečný identifikátor odkazu.Jen pro čtení | |
MajorVersion | Získá hlavní číslo verze odkazu.Jen pro čtení | |
MinorVersion | Získá číslo podverze odkazu.Jen pro čtení | |
Name | Získá název objektu.Jen pro čtení | |
Path | Získá cestu k souboru odkaz.Jen pro čtení | |
PublicKeyToken | Získá token veřejného klíče pro odkazované sestavení. | |
RevisionNumber | Získá číslo revize odkaz.Jen pro čtení | |
RuntimeVersion | Získá a nastaví verzi modulu runtime, který byl vytvořen odkaz proti.Jen pro čtení | |
SourceProject | Získá Project objektu, pokud je odkaz na projekt.Funkce Nothing ( nullodkaz null (Nothing v jazyce Visual Basic) odkaz).Jen pro čtení | |
StrongName | Získá, zda odkaz je podepsán dvojici veřejných/soukromých klíčů.Jen pro čtení | |
Type | Získá prjReferenceType hodnotu určující, zda je odkaz na sestavení nebo komponentu modelu COM.Jen pro čtení | |
Version | Získá verze vybraného odkazu. |
Nahoru
Metody
Název | Popis | |
---|---|---|
Remove | Odstraní odkaz z References objekt, který jej obsahuje. |
Nahoru
Poznámky
Referenceobjekty vrácené References kolekce VSProject podporu obou objektů Reference rozhraní a Reference2 rozhraní.Přetypovat na objekt Reference2 přístup Reference2 členy.
Reference2definuje všechny Reference členy nalezené v VSLangProj obor názvů, plus:
Příklady
Následující příklad vytvoří nový projekt ze šablony, přidá dva odkazy a zobrazí jejich typy.
'Macro Editor
Imports VSLangProj
Sub NewProject()
Dim newName As String = InputBox("New project name:")
' Create a new project in the solution based on an existing
' project.
Dim newProject As Project = DTE.Solution.AddFromTemplate( _
"C:\TemplatePath\Template.vbproj", _
"C:\ProjectPath\" & newName, newName)
' Add a COM reference and display its type.
Dim vsProject As VSProject = CType(newProject.Object, VSProject)
Dim newRef As Reference
newRef = vsProject.References.Add("C:\WINNT\System32\msmask32.ocx")
MsgBox(GetRefTypeName(newRef))
' Add an Assembly reference and display its type, "Assembly".
newRef = vsProject.References.Add("C:\SomeProject\bin\SomeProject.dll")
MsgBox(GetRefTypeName(newRef))
End Sub
Private Function GetRefTypeName(ByVal ref As Reference) _
As String
Dim type As String
Select Case ref.Type
Case prjReferenceType.prjReferenceTypeActiveX
type = "COM"
Case prjReferenceType.prjReferenceTypeAssembly
type = "Assembly"
End Select
Return type
End Function
Následující příklad vytvoří sestavu krátký odkaz na vlastnosti.
' Macro Editor
' Create a small report about a reference.
Imports VSLangProj
Function ReportReferences(ByVal aRef As Reference) As String
Dim report As String = ""
Dim type As String
' Each entry in the ArrayList will contain a label and a value.
Dim ht As System.Collections.ArrayList = _
New System.Collections.ArrayList()
With aRef
ht.Add(New String() {"Name", .Name})
ht.Add(New String() {"Description", .Description})
ht.Add(New String() {"Version", String.Format("{0}.{1}.{2}.{3}", _
.MajorVersion, .MinorVersion, .BuildNumber, .RevisionNumber)})
ht.Add(New String() {"Location", .ContainingProject.FullName})
Select Case .Type
Case prjReferenceType.prjReferenceTypeActiveX
type = "COM"
Case prjReferenceType.prjReferenceTypeAssembly
type = "Assembly"
End Select
ht.Add(New String() {"Type", type})
ht.Add(New String() {"Culture", .Culture})
End With
Dim datas() As String
For Each datas In ht
report &= datas(0) & ControlChars.Tab & datas(1) & ControlChars.CrLf
Next
Return report
End Function