BeforeDropOrPaste 事件
發生于使用者即將將資料卸載或貼上至物件時。
語法
針對 Frame
Private Sub物件 _BeforeDropOrPaste ( ByValCancelAs MSForms.ReturnBoolean，
ctrlAs Control，
ByValActionAs fmAction，
ByValDataAs DataObject，
ByValXAs Single，
ByValYAs Single，
ByValEffectAs MSForms.ReturnEffect，
ByValShiftAs fmShiftState)
針對 MultiPage
Private Sub物件_BeforeDropOrPaste (indexAs Long，
ByValCancelAs MSForms.ReturnBoolean，
ctrlAs Control，
ByValActionAs fmAction，
ByValDataAs DataObject，
ByValXAs Single，
ByValYAs Single，
ByValEffectAs MSForms.ReturnEffect，
ByValShiftAs fmShiftState)
針對 TabStrip
Private Sub物件_BeforeDropOrPaste (indexAs Long，
ByValCancelAs MSForms.ReturnBoolean，
ByValActionAs fmAction，
ByValDataAs DataObject，
ByValXAs Single，
ByValYAs Single，
ByValEffectAs MSForms.ReturnEffect，
ByValShiftAs fmShiftState)
針對其他控制項
Private Sub物件 _BeforeDropOrPaste ( ByValCancelAs MSForms.ReturnBoolean，
ByValActionAs fmAction，
ByValDataAs DataObject，
ByValXAs Single，
ByValYAs Single，
ByValEffectAs MSForms.ReturnEffect，
ByValShiftAs fmShiftState)
BeforeDropOrPaste事件語法具有下列部分：
| 部分 | 描述 |
|---|---|
| 物件 | 此為必要動作。 有效的物件名稱。 |
| index | 此為必要動作。 MultiPage中卸載或貼上作業將影響的Page索引。 |
| Cancel | 此為必要動作。 事件狀態。 False 表示控制項應該處理事件 (預設) 。 True 表示應用程式處理事件。 |
| Ctrl | 此為必要動作。 目標控制項。 |
| 動作 | 此為必要動作。 根據目前的鍵盤設定，指出暫止拖放作業的結果。 |
| 資料 | 此為必要動作。 拖放作業中拖曳的資料。 資料會封裝在 DataObject 中。 |
| X、Y | 此為必要動作。 發生下拉時，滑鼠指標的水準和垂直位置。 這兩個座標都是以點為單位來測量。 X 是從控制項的左邊緣測量; Y 是從 控制項的頂端測量而來。 |
| Effect | 此為必要動作。 拖放作業對目標控制項的影響。 |
| Shift | 此為必要動作。 指定 SHIFT、CTRL 和 ALT 的狀態。 |
設定
[動作] 的設定如下：
| 常數 | 值 | 描述 |
|---|---|---|
| fmActionPaste | 2 | 將選取的物件貼到置放目標中。 |
| fmActionDragDrop | 3 | 表示使用者已將物件從來源拖曳至置放目標，並將它放在置放目標上。 |
Effect的設定如下：
| 常數 | 值 | 描述 |
|---|---|---|
| fmDropEffectNone | 0 | 不會將 置放來源 複製或移動到置放目標。 |
| fmDropEffectCopy | 1 | 將置放來源複製到置放目標。 |
| fmDropEffectMove | 2 | 將置放來源移至置放目標。 |
| fmDropEffectCopyOrMove | 3 | 將置放來源複製或移動至置放目標。 |
Shift的設定如下：
| 常數 | 值 | 描述 |
|---|---|---|
| fmShiftMask | 1 | 已按下 SHIFT。 |
| fmCtrlMask | 2 | 按下 CTRL。 |
| fmAltMask | 4 | 已按下 ALT。 |
註解
針對 MultiPage 或 TabStrip，Visual Basic for Applications 會在將資料物件傳送至控制項時起始此事件。
對於其他控制項，系統會在卸載或貼上作業之前立即起始此事件。
當控制項處理此事件時，您可以更新 Action 引數來識別要執行的拖放動作。
當 Effect 設定為 fmDropEffectCopyOrMove時，您可以將 Action 指派給 fmDropEffectNone、 fmDropEffectCopy或 fmDropEffectMove。
當 Effect 設定為 fmDropEffectCopy 或 fmDropEffectMove時，您可以將 Action 重新指派給 fmDropEffectNone。 當Effect設定為fmDropEffectNone時，您無法重新指派Action。
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。