VB 6.0 Project Menu Check Marks

[marisam]

I need guidance with my VB script.

When the menu item called title is selected I want to display a check mark next to the menu option called title and if it’s unselected the check mark disappears and does not display the caption.

Private Sub mnutitle_Click()
If mnutitle.Checked = False Then

fraDatabase.Caption = ""
Else
mnutitle.Checked = True

fraDatabase.Caption = "Database by Marisa"
End If

Thanks

 

[fumei]

You may get better answers posting in the VB forum.

Gerry

 

[TonyJollans]

If this is VBA in an Office program you should be able to set a FaceId - on a quick look I couldn't see the one Word uses but 1087 and 1907 are tick marks which might do you.

Enjoy,
Tony

--------------------------------------------------------------------------------------------
We want to help you; help us to do it by reading this: Before you ask a question.

Professional Office Developers Association

 

[fumei]

I think "Private Sub mnutitle_Click()" may be a clue. This is a Click event for a menu item. I do not think there is no such beast in VBA.

Gerry