Validating
If e.Sender.Text.Contains(",") Then MessageBox.Show("只允许选择一个值")Else e.Sender.Text = IIF(e.Sender.Text = "True","是","否")End If