Visio) (Connect.FromSheet 屬性
會傳回一個或多個連接的來源圖形。 唯讀。
語法
運算式。FromSheet
表達 代表 Connect 物件的變數。
傳回值
圖形
註解
Connect物件的FromSheet屬性很簡單。 它一律會傳回 Connect 物件的來源圖形。
Connects集合代表數個連接。 如果集合所表示的每個連接都來自同一個圖形,則集合的 FromSheet 屬性會傳回該圖案。 否則, FromSheet 屬性會 傳回 Nothing ,而且不會引發例外狀況。
範例
這個 Microsoft Visual Basic for Applications (VBA) 宏會示範如何使用 FromSheet 屬性來尋找 Connect 物件源自于 Microsoft Visio 繪圖中的圖形。 此範例會將連接資訊顯示在 [立即] 視窗中。
這個範例假設使用中文件至少包含兩個相連的圖形。 為了獲得最佳結果,請從 組織結構 圖形樣板連接兩個圖形。
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 支援與意見反應。