Visio) (Connects.FromSheet 屬性

會傳回一個或多個連接的來源圖形。 唯讀。

語法

運算式。寄件者工作表

運算式 代表 Connects 物件的變數。

傳回值

圖形

註解

Connect 物件的 FromSheet 屬性非常簡單易懂。 它一律會傳回 Connect 物件來源的圖形。

Connects 集合代表數個連線。 如果集合所代表的每個連接都來自相同的圖形，則集合的 FromSheet 屬性會傳回該圖形。 否則， FromSheet 屬性會傳回 Nothing ，且不會引發例外狀況。

範例

此Microsoft Visual Basic for Applications (VBA) 巨集示範如何使用 FromSheet 屬性在 Microsoft Visio 繪圖中尋找 Connect 物件來源的圖形。 此範例會將連接資訊顯示在 [立即] 視窗中。

這個範例假設使用中文件至少包含兩個相連的圖形。 為了獲得最佳結果，請從 [組織圖圖形 ] 樣板連接兩個圖形。

 
Public Sub FromSheet_Example() 
 
 Dim vsoShapes As Visio.Shapes 
 Dim vsoShape As Visio.Shape 
 Dim vsoConnectFrom As Visio.Shape 
 Dim vsoConnects As Visio.Connects 
 Dim vsoConnect As Visio.Connect 
 Dim intCurrentShapeIndex As Integer 
 Dim intCounter As Integer 
 
 Set vsoShapes = ActivePage.Shapes 
 
 For intCurrentShapeIndex = 1 To vsoShapes.Count 
 Set vsoShape = vsoShapes(intCurrentShapeIndex) 
 Set vsoConnects = vsoShape.Connects 
 
 For intCounter = 1 To vsoConnects.Count 
 Set vsoConnect = vsoConnects(intCounter) 
 Set vsoConnectFrom = vsoConnect.FromSheet 
 
 'Print the name of the shape the 
 'Connect object originates from. 
 Debug.Print vsoConnectFrom.Name 
 
 Next intCounter 
 
 Next intCurrentShapeIndex 
 
End Sub

支援和意見反應

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