小編給大家分享一下易語言如何驗(yàn)證十八位身份證號碼是否正確，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！

創(chuàng)新互聯(lián)從2013年成立，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目成都網(wǎng)站建設(shè)、網(wǎng)站設(shè)計(jì)網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢想脫穎而出為使命，1280元香格里拉做網(wǎng)站,已為上家服務(wù),為香格里拉各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:028-86922220

常量數(shù)據(jù)表

.版本 2
.常量 行政劃位碼2, "<文本長度: 20409>", , 各區(qū)身份證前六位
.常量 行政劃位碼1, "<文本長度: 29990>", , 各區(qū)身份證前六位

驗(yàn)證十八位身份證號的代碼

.版本 2
.程序集 程序集1
.子程序 驗(yàn)證身份證號, 邏輯型
.參數(shù) 十八位身份證號, 文本型
.局部變量 系數(shù), 整數(shù)型, , "0"
.局部變量 余數(shù)表, 整數(shù)型, , "0"
.局部變量 位, 整數(shù)型
.局部變量 和, 整數(shù)型
.局部變量 校驗(yàn)碼, 文本型
.局部變量 i, 整數(shù)型
.局部變量 temp, 整數(shù)型
.局部變量 臨時(shí)位, 文本型
系數(shù) ＝ { 7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2 }
余數(shù)表 ＝ { 1, 0, -1, 9, 8, 7, 6, 5, 4, 3, 2 } ' -1代表X
.如果真 (取文本長度 (十八位身份證號) ≠ 18)
 返回 (假)
.如果真結(jié)束
.計(jì)次循環(huán)首 (17, i)
 臨時(shí)位 ＝ 取文本中間 (十八位身份證號, i, 1)
 .如果 (臨時(shí)位 ≥ “0” 且 臨時(shí)位 ≤ “9”) ' 前17位有非數(shù)字位，直接返回假
  位 ＝ 到整數(shù) (臨時(shí)位)
  和 ＝ 和 ＋ 位 × 系數(shù) [i]
 .否則
  返回 (假)
 .如果結(jié)束
.計(jì)次循環(huán)尾 ()
temp ＝ 余數(shù)表 [和 ％ 11 ＋ 1]
校驗(yàn)碼 ＝ 選擇 (temp ＝ -1, “X”, 到文本 (temp))
返回 (選擇 (校驗(yàn)碼 ＝ 取文本右邊 (十八位身份證號, 1), 真, 假))
.子程序 取身份證出生年月, 文本型
.參數(shù) 十八位身份證號, 文本型
.局部變量 出生年月, 文本型
.局部變量 temp, 日期時(shí)間型
.如果真 (取文本長度 (十八位身份證號) ≠ 18)
 返回 (“”)
.如果真結(jié)束
出生年月 ＝ 取文本中間 (十八位身份證號, 7, 8)
temp ＝ 到時(shí)間 (出生年月 ＋ “000000”)
.如果真 (temp ＝ 指定時(shí)間 (100, 1, 1, , , ))
 返回 (“”)
.如果真結(jié)束
返回 (取文本左邊 (出生年月, 4) ＋ “-” ＋ 取文本中間 (出生年月, 5, 2) ＋ “-” ＋ 取文本右邊 (出生年月, 2))
.子程序 取身份證號碼性別信息, 文本型
.參數(shù) 十八位身份證號, 文本型
.局部變量 性別碼, 整數(shù)型
.局部變量 temp, 文本型
.如果真 (取文本長度 (十八位身份證號) ≠ 18)
 返回 (“”)
.如果真結(jié)束
temp ＝ 取文本中間 (十八位身份證號, 17, 1)
.如果真 (temp ＜ “0” 或 temp ＞ “9”)
 返回 (“”)
.如果真結(jié)束
性別碼 ＝ 到整數(shù) (temp)
返回 (選擇 (性別碼 ％ 2 ＝ 0, “女”, “男”))
.子程序 取身份證行政區(qū)位碼信息, 文本型
.參數(shù) 十八位身份證號, 文本型
.局部變量 行政區(qū)位碼, 文本型
.局部變量 行政區(qū)位碼表, 文本型, , "0"
.局部變量 i, 整數(shù)型
.局部變量 temp, 文本型, , "0"
.局部變量 地區(qū)值, 文本型
行政區(qū)位碼 ＝ 取文本左邊 (十八位身份證號, 6)
行政區(qū)位碼表 ＝ 分割文本 (#行政劃位碼1, #換行符, )
.計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (行政區(qū)位碼表), i)
 .如果真 (行政區(qū)位碼 ＝ 取文本左邊 (行政區(qū)位碼表 [i], 6))
  temp ＝ 分割文本 (行政區(qū)位碼表 [i], “,”, )
  地區(qū)值 ＝ temp [2]
  跳出循環(huán) ()
 .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (地區(qū)值 ＝ “”)
 行政區(qū)位碼表 ＝ 分割文本 (#行政劃位碼2, #換行符, )
 .計(jì)次循環(huán)首 (取數(shù)組成員數(shù) (行政區(qū)位碼表), i)
  .如果真 (行政區(qū)位碼 ＝ 取文本左邊 (行政區(qū)位碼表 [i], 6))
   temp ＝ 分割文本 (行政區(qū)位碼表 [i], “,”, )
   地區(qū)值 ＝ temp [2]
   跳出循環(huán) ()
  .如果真結(jié)束
 .計(jì)次循環(huán)尾 ()
.如果真結(jié)束
返回 (地區(qū)值)

啟動(dòng)窗口程序集

.版本 2
.程序集 窗口程序集_啟動(dòng)窗口
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
顯示結(jié)果編輯框.加入文本 (到文本 (驗(yàn)證身份證號 (“420822199511087728”)) ＋ “,” ＋ 到文本 (取身份證出生年月 (“420822199511087728”)) ＋ “,” ＋ 到文本 (取身份證號碼性別信息 (“420822199511087728”)) ＋ “,” ＋ 到文本 (取身份證行政區(qū)位碼信息 (“420822199511087728”)))

運(yùn)行結(jié)果：

以上是“易語言如何驗(yàn)證十八位身份證號碼是否正確”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對大家有所幫助，如果還想學(xué)習(xí)更多知識，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道！

網(wǎng)站題目：易語言如何驗(yàn)證十八位身份證號碼是否正確
網(wǎng)站鏈接：http://chinadenli.net/article2/jgjgoc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站維護(hù)、定制開發(fā)、關(guān)鍵詞優(yōu)化、品牌網(wǎng)站設(shè)計(jì)、電子商務(wù)、網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)