I have 2 Frames objects and 2 Msflexgrid object. I have Msflexgrid object as an array. Msflexgrid1(0) and Msflexgrid1(1).I am trying to Move(drag) Msflexgrid1 object whichever I click (0) or (1) from Frame1 to drop it on to Frame2 object and vise Versa.
Fram1 to Fram2 or Frame2 to Frame1.
I read an Article about Drage and Drop methon and properties. Article is not very helpful and I am having problem. When I drop the Grid object (0) or (1) on the Frame object Fram2 it does not appear.
Private Sub Frame2_DragDrop(Index As Integer, Source As Control, X As Single, Y As Single)
If TypeOf Source Is MSFlexGrid1 Then
Source.Drag vbEndDrag
Frame3(1).Container = Source
End If
End Sub
Fram1 to Fram2 or Frame2 to Frame1.
I read an Article about Drage and Drop methon and properties. Article is not very helpful and I am having problem. When I drop the Grid object (0) or (1) on the Frame object Fram2 it does not appear.
Private Sub Frame2_DragDrop(Index As Integer, Source As Control, X As Single, Y As Single)
If TypeOf Source Is MSFlexGrid1 Then
Source.Drag vbEndDrag
Frame3(1).Container = Source
End If
End Sub
