通过

Reference3.Aliases 属性

  • 项目

获取或设置指定引用的别名。 此属性仅应用于 Visual C#。

命名空间：  VSLangProj80
程序集：  VSLangProj80（在 VSLangProj80.dll 中）

语法

声明
Property Aliases As String

string Aliases { get; set; }

property String^ Aliases {
    String^ get ();
    void set (String^ value);
}

abstract Aliases : string with get, set

function get Aliases () : String 
function set Aliases (value : String)

属性值

类型：String
一个表示别名的字符串。

备注

在 Visual C# 中，可以将一个或多个替换名称或别名在项目中用作引用名。 此属性允许查看或设置别名。

示例

此示例测试项目是否为 Visual C# 项目，然后列出项目引用的所有别名。 在运行此示例之前，请打开一个 Visual C# 项目。 若要将此示例作为外接程序运行，请参见如何：编译和运行自动化对象模型代码示例。

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)
    DisplayAliases(applicationObject)
End Sub
Public Sub DisplayAliases(ByVal dte As DTE2)
    ' The first project is a Visual Basic or C# project.
    Dim vsProject As VSProject2 = _
    CType(applicationObject.Solution.Projects.Item(1).Object, _
    VSProject2)
    Dim aRef As Reference3
    Dim refStr As String
    refStr = ""
    If vsProject.Project.Kind = PrjKind.prjKindCSharpProject Then
        For Each aRef In vsProject.References
            refStr += (aRef.Name & " " & aRef.Aliases & vbCr)
         Next
         MsgBox(refStr)
    Else
         MsgBox("The project is not a C# project")
    End If
End Sub

.NET Framework 安全性

请参阅

参考

Reference3 接口

VSLangProj80 命名空间