指定 圖層 物件的通用名稱。 讀取/寫入。
語法
表情。名稱U
詞 一個代表 圖層 物件的變數。
傳回值
字串
註解
您可以設定 Style 物件的 NameU 屬性，代表並非 Microsoft Office Visio 預設樣式的樣式。 如果嘗試設定 Visio 預設樣式的 NameU 屬性，就會產生錯誤。
注意事項
從 Microsoft Visio 2000 開始，你可以同時使用本地名稱和通用名稱來指稱 Visio 的圖形、主圖、文件、頁面、列、附加元件、儲存格、超連結、樣式、字型、主捷徑、UI 物件和圖層。 例如，當使用者命名一個形狀時，該使用者是在指定一個本地名稱。 從 Microsoft Office Visio 2003 開始，ShapeSheet 試算表僅在儲存格公式與值中顯示通用名稱。 (在早期版本中，通用名稱在使用者介面中無法顯示。)
身為開發人員，如果您不希望每次將方案本土化時就要變更名稱，可以在程式中使用通用名稱。 使用 Name 屬性來取得或設定 超連結、 圖層、 主圖、 主、主捷徑、 頁面、 形狀、 樣式或 列 物件的本地名稱。 使用 NameU 屬性來取得或設定其通用名稱。
範例
下列的 Microsoft Visual Basic for Applications (VBA) 巨集會示範如何使用 NameU 屬性顯示圖層名稱。 此巨集還會使用 Layer 屬性取得特定圖層的參考，並使用 LayerCount 屬性決定已有指派圖形的圖層數目。
Public Sub NameU_Example()
Dim vsoPage As Visio.Page
Dim vsoShape As Visio.Shape
Dim vsoLayers As Visio.Layers
Dim vsoLayer As Visio.Layer
If ActiveDocument Is Nothing Then
Documents.Add ("")
End If
Set vsoPage = ActivePage
If vsoPage Is Nothing Then
Set vsoPage = ActiveDocument.Pages(1)
End If
'Draw a rectangle.
Set vsoShape = vsoPage.DrawRectangle(1, 5, 5, 1)
'Get the Layers collection.
Set vsoLayers = vsoPage.Layers
'Create a layer named ExampleLayer1 and add the shape to it.
Set vsoLayer = vsoLayers.Add("ExampleLayer1")
vsoLayer.Add vsoShape, 1
'Create a layer named ExampleLayer2 and add the shape to it.
Set vsoLayer = vsoLayers.Add("ExampleLayer2")
vsoLayer.Add vsoShape, 1
'Verify that the shape has been assigned to 2 layers.
Debug.Print "The page has " & vsoShape.LayerCount & " layers."
'Get a reference to the first layer.
Set vsoLayer = vsoShape.Layer(1)
'Verify by using the NameU property.
Debug.Print "Current vsoLayer name is """ & vsoLayer.NameU & "."""
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。