输入完成以后,在validateEdit事件加入如下代码
If e.Col.Name = "第一列" Then If ("|" & e.Col.ComboList & "|").Contains("|" & e.text & "|") = False Then e.Cancel = True msgbox("输入错误") End IfEnd If