共用方式為


DataColumn.SetProperty method (Visio)

會設定指定之資料欄屬性的值。

注意事項

This Visio object or member is available only to licensed users of Visio Professional 2013.

語法

表情SetProperty (屬性價值)

一個回傳 DataColumn 物件的表達式。

參數

名稱 必要/選用 資料類型 描述
屬性 必要 VisDataColumnProperties 你想設定的值資料欄位屬性。 關於可能的數值,請參見 備註
必要 Variant 用於指派資料欄屬性的值。 關於可能的數值,請參見 備註

傳回值

註解

將 Microsoft Visio 繪圖中的圖形連結到資料記錄集中的資料時,Visio 會將資料記錄集中的資料欄對應到 ShapeSheet 試算表 [圖形資料] 區段中的資料列 (每一列對應到一個圖形資料項目)。

注意事項

在一些舊版的 Visio 中,「圖形資料」是稱為「自訂屬性」。

資料欄位屬性會將資料欄位映射到 ShapeSheet 的 Shape Data 區塊中的特定儲存格。 例如,透過將 SetProperty 屬性的新值傳遞給 DisplayName 屬性,該值由列舉值 visDataColumnPropertyDisplayName 表示,你就能設定 ShapeSheet 中 Shape Data 區塊中特定形狀資料項目的 Label 儲存格值。

此外,設定該屬性會在形狀 資料 對話框中設定形狀資料項目的標籤,以及 Visio 使用者介面外部資料視窗中顯示的資料欄位名稱。 這些設定對應於你在 Visio 使用者介面的欄位設定對話框中設定的, (在外部資料視窗右鍵點擊後點選欄位設定) ,以及你可以在欄位設定對話框中為每欄的類型與單位框 (點擊欄位設定框中的資料類型) 。

Property 參數的可能值是在 VisDataColumnProperties 中宣告的,下表顯示這些值。

常數 描述
visDataColumnPropertyCalendar 3 資料欄屬性的行事曆。
visDataColumnPropertyCurrency 5 資料欄屬性的貨幣。
visDataColumnPropertyDisplayName 6 資料欄屬性在 UI 中的顯示名稱。
visDataColumnPropertyHyperlink 8 將資料欄的值連結到圖形後,這個值是否會變成 Visio UI 中的超連結。
visDataColumnPropertyLangID 2 資料欄屬性的語言識別碼。
visDataColumnPropertyType 1 資料欄屬性的資料類型。
visDataColumnPropertyUnits 4 資料欄屬性的單位。
visDataColumnPropertyVisible 7 資料欄屬性是否顯示在 UI 中。

Value 參數的可用值根據 Property 參數值而定。 下表顯示了每個資料欄位屬性的有效資料欄位屬性值,依據資料欄位資料型態而定。

資料欄位屬性 數字 Date 貨幣 持續時間 字串 布林值
常數 visPropTypeNumber visPropTypeDate visPropTypeCurrency visPropTypeDuration visPropTypeString visPropTypeBoolean
Visible 布林值 布林值 布林值 布林值 布林值 布林值
DisplayName 字串 字串 字串 字串 字串 字串
LangID 有效 LCID 編號
貨幣 有效的 3 個字母貨幣常數字串,如 Visio ShapeSheet 試算表的 CY 函數中所用。
行事曆 根據 LangID 值 (VisCellVals 的成員之一,請參見下表) 。
Units 下列其中一個 VisUnitsCodes 成員:
  • visAcre
  • 視角單位
  • 可見度公分
  • 西塞羅斯家族
  • visCicerosAndDidots
  • 可見度數安全
  • 可見度
  • vis繪圖單元
  • visFeet
  • 腳與英寸
  • 可見公頃
  • visDidots
  • 可觀性
  • visInchFrac
  • 可見公里
  • 可視度計
  • 維斯邁爾弗拉克
  • visMiles
  • 可見毫米
  • visMin
  • visNautMiles
  • visPageUnits
  • 視覺飛卡
  • visPicasAndPoints
  • visPoints
  • visRadians
  • 視覺安全
  • 可見度
  • visNumber (特殊行為:此常數使值無單位)

OR

描述字串:用於單位的字串,如 cmsq cm。此字串會被驗證為支援的 Visio 單位之一。 若傳送無效的字串,將導致此方法失敗。
下列其中一個 VisUnitsCodes 成員:
  • 可見度單位
  • 已過日
  • visElapsedHour
  • visElapsedMin
  • 已過安全
  • 已過週

OR

描述字串:用於單位如 ew 的字串。 此字串將經過驗證而成為其中一個受支援的 Visio 單位。 若傳送無效的字串,將導致此方法失敗。
超連結 布林值

LangID 與 Calendar 屬性會以下表所示的驗證規則相繫結。 未顯示的語言只能使用西曆。

語言 希爾吉 西方的 法文音譯 英文音譯 希伯來陰曆 塞迦曆 日本天皇時代 朝鮮檀紀曆 泰曆
所有阿拉伯文 x x x x
孟加拉 (孟加拉) x x
潛水 x x
所有英文 x x x x
波斯文 x x
希伯來文 x x
印度文 x x
日文 x x
韓文 x x
喀什米爾文 (阿拉伯) x x
旁遮普文 (巴基斯坦) x x
普什圖文 x x
信德語 x x
泰文
烏都文 x x
塔姆齊特 x x

範例

以下Microsoft Visual Basic for Applications (VBA) 巨集示範如何使用 GetProperty 方法取得資料記錄集第一欄 Shape Data 區塊中 Label 儲存格的值,並將其顯示於即時視窗中。 接著它使用 SetProperty 方法設定值並顯示新值。 變更此值會針對連結至資料記錄集中資料列的所有圖形,變更 [圖形資料] 對話方塊中圖形資料項目的標籤。

為了取得及設定 Label 儲存格的值,巨集會將 visDataColumnPropertyDisplayName 值從 VisDataColumnProperties 列舉傳遞到 DataColumn.GetPropertyDataColumn.SetProperty 方法。

執行此巨集之前,必須先在您的 VBA 專案中至少建立一個要傳遞至巨集的資料記錄集。

 
Public Sub SetProperty_Example(vsoDataRecordset As Visio.DataRecordset) 
    Dim strPropertyName As String 
    Dim strNewName As String 
    Dim vsoDataColumn As Visio.DataColumn 
 
    strNewName = "New Property Name" 
    Set vsoDataColumn = vsoDataRecordset.DataColumns(1) 
 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
 
    vsoDataColumn.SetProperty visDataColumnPropertyDisplayName, strNewName 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應