會設定指定之資料欄屬性的值。
注意事項
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 成員:
OR 描述字串:用於單位的字串,如 cm 或 sq cm。此字串會被驗證為支援的 Visio 單位之一。 若傳送無效的字串,將導致此方法失敗。 |
下列其中一個 VisUnitsCodes 成員:
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.GetProperty 和 DataColumn.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 支援與意見反應。