Visual Basic - Insertan un control en tiempo de ejecucion

Hola a Todos y gracias por la ayuda,

Yo quiero que en tiempo de ejecucion (osea cuando esta corriendo el programa) tocar un boton e insertar un control shape en un determinado lugar o que el usuario dibuje con el mismo.

Es dificil, asi que gracias por intentarlo

La forma de insertar un Control en tiempo de ejecución con VB6 es crear en tiempo de diseño una matriz de controles del tipo a insertar (con un solo elemento) y en tiempo de ejecución crear dichos controles y darles valor a las propiedades.

Ejemplo: en un formulario pon un Control llamado ShapeMat pon su propiedad indice a 1 y un command button

añade el código
Private Sub Command1_Click()
Dim sh As Shape

Load ShapeMat(ShapeMat.Count)
Set sh = ShapeMat(ShapeMat.Count - 1)
With sh
sh.Left = ShapeMat(ShapeMat.Count - 2).Left + 100
sh.Top = ShapeMat(ShapeMat.Count - 2).Top + 100
sh.Visible = True
End With
End Sub

Hola amigo puedes hacerlo estableciondo la propiedad index del objeto shape a 0 para crear una matrix, luego utilizas lo siguiente

load shape(1)
y esto te crea el siguiente shape

puedes manipular sus propiedades asi
shape(1).top=562
shape(1).left=562 ' para establecer su pocision