網上關于銀聯刷卡機錯誤代碼16的刷卡知識比較多，也有關于銀聯刷卡機錯誤代碼16的問題，今天第一pos網(www.jianshengsheng.cn)為大家整理刷卡常見知識，未來的我們終成一代卡神。

本文目錄一覽：

1、銀聯刷卡機錯誤代碼16

銀聯刷卡機錯誤代碼16

語法:

=ka(銀聯卡號)

在模塊中錄入下列代嗎:

Function Ka(t As String) \'銀聯卡號校驗

Application.MacroOptions Macro:="ka", Description:="銀聯卡號校驗"

For p = Len(t) - 1 To 1 Step -1

m = m + 1 \'m僅作為判斷從右邊數位的奇偶數

If m Mod 2 = 1 Then \'計算奇位*2，個十相加

k = k + Int(Mid(t, p, 1) * 2 / 10) Mod 10 + Mid(t, p, 1) * 2 Mod 10

Else

k = k + Mid(t, p, 1)

End If

Next p

y = k Mod 10

If y = 0 Then y = 0 Else y = 10 - y

If t = Mid(t, 1, Len(t) - 1) & y Then

Ka = "√"

Else

Ka = "卡錯誤"

End If

End Function

再也不用心卡號輸錯了。

以上就是關于銀聯刷卡機錯誤代碼16的知識，后面我們會繼續為大家整理關于銀聯刷卡機錯誤代碼16的知識，希望能夠幫助到大家！

轉載請帶上網址：http://www.jianshengsheng.cn/shuakatwo/256237.html