How do i create an instance of an ActiveX Component at runtime?
Like x=new compname

Once that's done you have one instance available for use.   You
can create additional instances of it with the New operator, i.e.

Global or
Public or
Private or
Dim x As New CompName

depending on the scope you want the object variable to have

jdm

Did not work i tried ...

Public MyImage(100) As Image
'-- Image1 is an image on the Formwindow
  'Set MyImage(MyImageCount) = Image1
  'Set MyImage(MyImageCount) = New Image1
  Set MyImage(MyImageCount).Picture = LoadPicture(MyTrim(stri))

Tried all variants, Please help again !

   Load MyImage(ImageCount)
   MyImage(ImageCount).Picture = LoadPicture(picfile)

You have to use Load, because you are declaring it as an array.

Don't use the Set command to assign properties.  It is only
used to assign an object variable to an object.

Also remember that if you create two object variables, and
set one equal to the other, they will both point to the same
object.  

If you do like this:
  Public MyImage as New Image
  Public MyImag2 as Image

  Set MyImag2 = MyImage

Then MyImag2 points to the same object as MyImage

To have two independent instances of the same
type of object, you have to use the New keyword
on both.

  Public MyImage as New Image
  Public MyImag2 as New Image

Then, to copy the properties of one to another, you
have to do it one at a time.  You can't use
  Set MyImag2 = MyImage
because it redirects MyImag2's pointer to MyImage
and you no longer have two independent objects.

And you can't do this:
  MyImag2 = MyImage
because VB won't let you.

What you have to do is:
  MyImag2.Picture = MyImage.Picture
  MyImag2.Border = MyImage.Border
  . . .etc.

until all the properties you want
to copy are copied.

jdm