OLEDragDropをコントロール配列で使うには

解決

アナログ 2005-11-06 01:38:26 No: 92452

Private Sub text1_OLEDragDrop(Data As DataObject, Effect As Long,
Button As Integer, Shift As Integer, _
X As Single, Y As Single)

などで、テキストボックス(text1)にファイルなどがドラッグアンドドロップされたときに、上記の関数を呼び出せますが、
コントロール配列にしたテキストボックス（text1(1)など）にドロップしたときに同様のことをしたいのですが、よい方法ないでしょうか。

ガッ 2005-11-06 06:41:53 No: 92453

普通に書くのがいいのでは…？

アナログ 2005-11-06 20:22:13 No: 92454

Private Sub text1_OLEDragDrop(index As Integer, _
                             Data As DataObject, Effect As Long, _
                             Button As Integer, Shift As Integer, _
                             X As Single, Y As Single)

のように、１番目の引数にコントロール配列のindexを入れられるようです。
解決しました。