VB菜单只允许一个checked

怎样令VB菜单只允许一个checked?就是,例如有2个菜单项,我点第一个,然后再点第二个,第一个的checked就会消失

2026年09月22日 03:19

有2个网友回答

网友（1）：

这叫做菜单互斥
步骤1：
将所有需要互斥的菜单的事件全部删除（如果没有，省略这个步骤）

步骤2：
将所有需要互斥的菜单名称改成一样，比如，都是m1,改完不要点【确定】按钮。依次把菜单的索引设置好，第一个是0，第二个是1，以此类推

步骤3：
这时可以点【确定】按钮了

步骤4：
在窗口中单击其中任意一个按钮，进入代码编辑，把下面的代码复制进去
Dim i As Integer
For i = 0 To m1.Count - 1
If i = Index Then
m1(i).Checked = True
Else
m1(i).Checked = False
End If
Next

步骤5：
双击你的窗体的空白处，进入Form_Load代码编辑，输入下面的代码
m1_Click 0

ok，可以了

网友（2）：

建议使用optionButton。