New Mouse Over Error

[Suzie Raboin]

I have a form set up so that when the mouse passes over the command buttons the font changes to blue. I did the exact same thing on other forms but it won't work. It tells me that the "Object does not support this property or method". I have everything set up exactly as the form that works so I don't know what to do. Can anyone help?

 

[Anne]

Hi suzie - Please post your code so we can see what you
are trying to do. Thanks - Anne

-----Original Message-----
I have a form set up so that when the mouse passes over

the command buttons the font changes to blue. I did the
exact same thing on other forms but it won't work. It
tells me that the "Object does not support this property
or method". I have everything set up exactly as the form
that works so I don't know what to do. Can anyone help?

 

[Suzie Raboin]

Private Function MouseMove(intBtn As Integer)

Dim intOption As Integer

For intOption = 1 to 5
If intOption = intBtn Then
Me(“cmdOption†& intOption).ForeColor = RGB(0, 0, 255)
Else
Me(“cmdOption†& intOption).ForeColor = RGB(0, 0, 0)
End If
Next intOption

Function End

If I use this code on form that were created at least 6 months ago it works fine. If I try to create a new form and use this code it won't work.