ドラッグするときのコントロール配列のインデックスについて

質問

picture1（コントロール配列）からpicture2へドラッグしたとき
ドラッグした元のpicture1の配列番号を得る方法を教えてください

回答No.2

todo36 · ベストアンサー

Source.Indexで分かります。

Private Sub Picture2_DragOver(Source As Control, X As Single, Y As Single, State As Integer)

Dim s As String

On Error Resume Next
s = Source.Name
s = s & "(" & Source.Index & ")"
Debug.Print "Picture2に" & s & "がDragされました"
End Sub

お礼

回答していただきありがとうございます

回答No.1

duckling

ドラッグがスタートした時点で
パブリックの変数にnameを格納したらどうでしょうか？

他に方法はありそうですが。（ぉ

お礼

回答ありがとうございます