日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當(dāng)前位置: 首頁(yè) > 编程资源 > 综合教程 >内容正文

综合教程

excel vba在身份证中如何提取数字来判别男女(vba在身份证中怎么提取数字来判别男女)

發(fā)布時(shí)間:2023/12/29 综合教程 32 生活家
生活随笔 收集整理的這篇文章主要介紹了 excel vba在身份证中如何提取数字来判别男女(vba在身份证中怎么提取数字来判别男女) 小編覺得挺不錯(cuò)的,現(xiàn)在分享給大家,幫大家做個(gè)參考.

  excel中使用vba在身份證中提取數(shù)字來(lái)判別男女方法,有需要的朋友可以參考本文,一起來(lái)看看吧!

  步驟

  1、首先我們打開一個(gè)工作樣表作為例子?! ?/p>

  使用alt+f11快捷鍵或者使用開發(fā)者工具進(jìn)入vba編輯窗口。預(yù)先輸入身份證代碼變量?! ?/p>

  在下面輸入以下代碼。

  i = Right(sid, 1)

  If Int(i / 2) = i / 2 Then '為偶數(shù)

  sex = "女"

  Else

  sex = "男"

  End If

  MsgBox "性別:" + sex

  End Sub  

  代碼解釋一下,首先對(duì)15位數(shù)身份證的末尾值取值,然后用if函數(shù)對(duì)i變量進(jìn)行判斷,判斷的條件為i值是否為偶數(shù)。如果為偶數(shù)則性別顯示為女?! ?/p>

  反之,則顯示性別為男。完成判斷需要輸入end if結(jié)束if判斷。然后輸入信息顯示函數(shù)msgbox來(lái)顯示性別的信息?! ?/p>

  這個(gè)例子使用的是固定的變量,如果需要手動(dòng)輸入身份證擁有更多的自主性,我們可以將固定變量的代碼修改一下。我把代碼放在圖片里,大家可以看看?! ?/p>

  以上就是excel vba在身份證中怎么提取數(shù)字來(lái)判別男女方法介紹,操作很簡(jiǎn)單的,大家學(xué)會(huì)了嗎?希望這篇文章能對(duì)大家有所幫助!

總結(jié)

以上是生活随笔為你收集整理的excel vba在身份证中如何提取数字来判别男女(vba在身份证中怎么提取数字来判别男女)的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò),歡迎將生活随笔推薦給好友。