支持为空校验, 支持年月日有效校验,包括闰年, 支持18位最后一位有效校验, 代码参考: ifls_identity_no=''orisnull(ls_identity)then MessageBox("系统提示","身份证号码不能为空!!",StopSign!,ok!) returnFalse elseifll_identity_no_len15ANDll_identity_no_len18then MessageBox("系统提示","身份证号码位数不正确,请检查输入情况!!",StopSign!,ok!) returnFalse endif