Visio (的 Document.Drop 方法)
將物件放在樣板或檔等接收物件上,或Master或MasterShortcuts集合,以建立新的Master 物件。
語法
運算式。卸 (ObjectToDrop、 xPos、 yPos)
表達 代表 Document 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
ObjectToDrop | 必要 | [UNKNOWN] | 要放置的物件。 雖然這通常是 Visio 物件,例如 Master、 Shape或 Selection 物件,但它可以是提供 IDataObject 介面的任何 OLE 物件。 |
xPos | 必要 | 整數 | 放置圖形寬度中心或 PinX 的 x 座標。 |
yPos | 必要 | 整數 | 放置圖形高度中心或 PinY 的 y 座標。 |
傳回值
主圖形
註解
使用 Drop 方法類似以滑鼠移動圖形。 ObjectToDrop (置放的物件) 可以是繪圖頁面上的主圖形或圖形。
如果 ObjectToDrop 是一個 Master,主圖形的針會放在指定的座標上。 主圖形的針腳通常 (但不一定) 位於它的旋轉中心上。
若要在樣板中建立新的主圖形,請將 Drop 方法套用至代表樣板的 Document 物件 (樣板必須開啟為原始或複本,而不是唯讀) 。 在此情況下,會忽略 xPos 和 yPos 引數,並傳回所建立的新主圖形。
範例
下列範例會顯示如何使用 Drop 方法,將圖形放在 Document 物件上以建立主圖形。
Public Sub Drop_Example()
Dim vsoShape As Visio.Shape
Dim vsoMaster As Visio.Master
Set vsoShape = ActivePage.DrawRectangle(1, 2, 2, 1)
'Create a master in the document.
'The master appears on the document stencil.
Set vsoMaster = ActiveDocument.Drop(vsoShape, 0, 0)
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。