在菜单代码中设置我这有一个菜单!子菜单和主菜单名分别为dd和d子菜单的代码如下!·!
Private Sub dd_Click()
If dd.Checked = True Then
dd.Checked = False
Else
dd.Checked = True
End If
End Sub我调试过好用的!
Private Sub dd_Click()
If dd.Checked = True Then
dd.Checked = False
Else
dd.Checked = True
End If
End Sub我调试过好用的!
先将那一片区域的菜单项的Check设为False
再将该菜单项的Check设为True