The Question of this month..... 1

[cuok]

Hi friends,

Are there any way to get the caption of the option of the "Option Group" when the mouse moves over the option using the event "On mouse Move" ?

thanks

 

[danvlas]

This will display the caption or the option group as a 'tip' text:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
OptionGroupName.ControlTipText = OptionGroupName.Caption
End Sub

Regards,

Dan

 

[cuok]

hi dan, and thanks a lot for answering my q.

sorry i was not more clearer with my qestion:

What i ment was that i need to see the caption of each option WITHOUT chosing it by click, - only by moving over it.

 

[danvlas]

That's exactly what happens...However, if you have more controls in that area, bring the option group to front using Format menu.

Moreover, if the caption does not change, you can use the property sheet to set the Control Tip Text property and then you won't need code.


Dan

 

[cuok]

Thank you very much DAN!

It's Works perfectly !!