---

Hi,

On a form I put 25 images. Depending on an action one of the images has to
become visible.

ImageXX.Visible = True

Every action gives me a number corresponding with te image that must get
visible, like:

14 --> Image14.Visible = True
17 --> Image15.Visible = True
etc.

Now I wonder if there's a smart way to writ code to make an image visible,
like:

Result = 14
ImageResult.Visible = True

I tried this one and several others in syntax but they don't work.

Anyone an idea?

Thanks,

Ini

---

"Ini" <ini@ini.myweb.nl> wrote in message
news:bvqd8n$dor$1@news4.tilbu1.nb.home.nl...
>
> Every action gives me a number corresponding with te image that must get
> visible, like:
>
> 14 --> Image14.Visible = True
> 17 --> Image15.Visible = True
> etc.
>
Take a look at control arrays

- Peter

---

Hi

Try this

Private Sub ShowImage(lngX As Long)
Dim imgTemp As Image
For Each imgTemp In Me
imgTemp.Visible = False
If imgTemp.Name = "Image" & lngX Then imgTemp.Visible = True
Next imgTemp
End Sub


"Ini" <ini@ini.myweb.nl> skrev i en meddelelse
news:bvqd8n$dor$1@news4.tilbu1.nb.home.nl...
>
> Hi,
>
> On a form I put 25 images. Depending on an action one of the images has to
> become visible.
>
> ImageXX.Visible = True
>
> Every action gives me a number corresponding with te image that must get
> visible, like:
>
> 14 --> Image14.Visible = True
> 17 --> Image15.Visible = True
> etc.
>
> Now I wonder if there's a smart way to writ code to make an image visible,
> like:
>
> Result = 14
> ImageResult.Visible = True
>
> I tried this one and several others in syntax but they don't work.
>
> Anyone an idea?
>
> Thanks,
>
> Ini
>
>
>