Problem with forms

[Alain]

Hi to all,

I have written a small function to change/update the image control on all of
my forms

For Each frm In Forms
With frm
.Picture = "C:\blablabla.gif"
.PictureType = 0
.PictureSizeMode = 3
.PictureAlignment = 2
End With
Next

my problem is the code add a new image control on my forms instead of
modifying the properties of the already existing image control, the help
file is not helping me much so my question is why is it adding a new control
instead of modifying the one already on the form

TIA

Alain

 

[Allen Browne]

You arte setting the backgroud picture of hte form itself, not that of an
image control on the form.

Try:
With frm("NameOfYourImageControlHere")

 

[Alain]

Thanks

Alain

You arte setting the backgroud picture of hte form itself, not that of an
image control on the form.

Try:
With frm("NameOfYourImageControlHere")