gf_check_identity.srf
支持为空校验, 支持年月日有效校验,包括闰年, 支持18位最后一位有效校验, 代码参考: if ls_identity_no = '' or isnull(ls_identity)then MessageBox("系统提示","身份证号码不能为空!!",StopSign!,ok!) return False elseif ll_identity_no_len <> 15 AND ll_identity_no_len <> 18 then MessageBox("系统提示","身份证号码位数不正确,请检查输入情况!!",StopSign!,ok!) return False end if