會傳回一個或多個連接的來源圖形。 唯讀。
語法
表情。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 支援與意見反應。