vb中点击下拉菜单中的选项后，该项变成灰色，不可用，怎么实现

假设菜单选项名称为Save
那么，在它的单击事件中加入Save.Enabled=False就可以了追问

怎么保证点过一次之后就一直是灰色的

追答

enabled属性设置为false就一直是灰色了。

Private Sub b_Click()
b.Enabled = False
End Sub
假设主菜单为a
a下有个b选项
点击b后，b变灰本回答被提问者采纳

Combo1.Enabled = True
Combo1.ForeColor = &H80000008
Else
Combo1.Enabled = False
Combo1.ForeColor = &H808080
End If