条形码校验正确性算法

待校验条形码 ＝ 取文本左边 (条形码, 取文本长度 (条形码) － 1) ' 删除最后以为校验码 得到12位
.计次循环首 (取文本长度 (待校验条形码), i) ' 计算奇位数的和 + 偶位数的和 x 3, 但是要先减去以为校验码位 13 - 1 = 12位(有效位)
校验数 ＝ 校验数 ＋ 到整数 (取文本中间 (待校验条形码, i, 1)) × 选择 (i ％ 2 ＝ 0, 3, 1) ' 如果余数是0就是偶数....这个好理解pa 如果是偶数就要 x 3
.计次循环尾 ()
返回 (校验数 － 校验数 ％ 10 ＋ 选择 (校验数 ％ 10 ＝ 0, 0, 10) － 校验数 ＝ 到整数 (取文本右边 (条形码, 1)))
' 返回 (10 － 校验数 ％ 10 ＝ 选择 (到整数 (取文本右边 (条形码, 1)) ＝ 0, 10, 到整数 (取文本右边 (条形码, 1)))) ' 判断 校验数 是否为传入的条形码最后一位 ,判断方法: 10 - 取奇偶位数的合的个位数