Ok for the drag and drop add this:

Code:
Private CountArray As Integer      'Count the Created Object Array
Private AllowDrag As Boolean       'Disallow Arrayed object to create other objects



Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
If AllowDrag = False Then Exit Sub
CountArray = CountArray + 1
Load Picture1(CountArray)
Picture1(CountArray).Visible = True
Picture1(CountArray).Print CountArray

Picture1(CountArray).Move (X - Source.Width / 2), (Y - Source.Height / 2)
End Sub

Private Sub Form_Load()
Picture1(0).AutoRedraw = True
End Sub

Private Sub Picture1_DragOver(Index As Integer, Source As Control, X As Single, Y As Single, State As Integer)
If Not Index = 0 Then
AllowDrag = False
Else
AllowDrag = True
End If
End Sub
As for Removing the Object use:

Unload Picture1( the array number goes here )

You can put this in a menu and then call it in the Picture1 Mouse Down event to Remove the Item.

Also for resizing thats to do with your OWN ActiveX controls. You will need to add that yourself.