OLEObject.ClassID property (Visio)

會傳回代表 ActiveX 控制項或 OLE 內嵌或連結物件之圖形的類別識別碼字串。 唯讀。

語法

expression。 ClassID

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

傳回值

字串

註解

如果圖形不代表 ActiveX 控制項或 OLE 2.0 的內嵌或連結物件，則 ClassID 屬性會觸發例外狀況。 如果 visTypeIsOLE2 位元 (&H8000) 是設定於由 Shape. ForeignType。

ClassID 會傳回下列形式的字串：

{2287DC42-B167-11CE-88E9-002AFDDD917}

這會識別提供物件的應用程式。 例如，它可以將 Microsoft Visio 頁面上的內嵌物件識別為 Microsoft Excel 物件。

在使用圖形的 Object 屬性取得該圖形所代表物件的自動化介面後，可以取得圖形的 ClassID 或 ProgID 屬性來判斷該介面所提供的方法和屬性。

範例

下列的 Microsoft Visual Basic for Applications (VBA) 巨集會示範如何取得使用中頁面的 OLEObjects 集合，並在 [即時運算] 視窗中列印每個 OLEObject 物件的 ClassID。 下列範例會假設使用中頁面至少具有一個 OLE 2.0 內嵌或連結物件或是 ActiveX 控制項。

 
Public Sub ClassID_Example() 
 
 Dim intCounter As Integer 
 Dim vsoOLEObjects As Visio.OLEObjects 
 
 'Get the OLEObjects collection of the active page. 
 Set vsoOLEObjects = ActivePage.OLEObjects 
 
 'Step through the collection of OLEObjects on the page. 
 For intCounter = 1 To vsoOLEObjects.Count 
 Debug.Print vsoOLEObjects(intCounter).ClassID 
 Next intCounter 
 
End Sub

支援和意見反應

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