Document.VBProjectData property (Visio)

會傳回儲存於文件的 Microsoft Visual Basic 專案資料。 唯讀。

語法

表情。VBProjectData

詞 一個代表 文件 物件的變數。

傳回值

位元組 ()

範例

使用 VBProjectData 屬性來判斷文件是否有專案。 下列巨集會示範如何取得 Microsoft Visio 中文件的參照，以判斷文件是否擁有專案。 程式碼會從 Visio 文件外部的程式執行。

Private Sub Form_Load() 
 
 'Declare document variable 
 'and Array variable to hold project data. 
 Dim vsoDocument As Visio.Document 
 Dim btProjectData() As Byte 
 
 'Get the first object in the Documents collection 
 'of this instance of Visio. 
 Set vsoDocument = GetObject(, "Visio.Application").Documents(1) 
 
 'Populate the array with project data. 
 btProjectData = vsoDocument.VBProjectData 
 Debug.Print LBound(btProjectData); UBound(btProjectData) 
 
End Sub

若文件中沒有相關專案，則會在立即視窗中顯示「0 -1」。 若文件中有專案，上界將是某個大於零 (0) 的數字。 例如，「0 1535」表示一個專案有 1,536 位元組的資料。

支援和意見反應

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