你用的是菜单编辑器对吧
你添加中文,英文两个标签的时候都把复选的勾给打上
然后添加代码
假设中文选项名称为chinese,英文的为english
Private Sub chinese_Click()
chinese.Checked = True
english.Checked = False
End Sub
Private Sub english_Click()
chinese.Checked = False
english.Checked = True
End Sub
Private Sub Form_Load()
chinese.Checked = True
english.Checked = False
End Su