CheckMenuItem 方法
将指定命令ID菜单项打上小勾
CheckMenuItem(Command, Check)
Command 菜单命令ID,AddMenu参数所使用的命令ID
Check 为1则菜单打勾,为0取消