close

dfg dfgfg fdggg sdfsdf sdfsdf 

ID numberPublic Function EUCS_IDNumber(IDNumber) As String'Display the last 3 digit and checking numbertempID = IDNumber & ""tempValue = 0For i = 1 To Len(IDNumber)tempValue = tempValue + Mid(tempID, i, 1)Next iEUCS_IDNumber = "xxxxxx" & Right(tempID, 3) & "-" & (tempValue Mod 10) End Function .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO!

 

好站連結：http://blog.yam.com/ggqtuofzo






























arrow
arrow
    全站熱搜
    創作者介紹
    創作者 pybjps 的頭像
    pybjps

    子，这

    pybjps 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄