用导航打开主题
您可以使用现有检验数字算法或自定义算法,在 Visual Basic 脚本 (VBScript) 中创建自定义检验数字。
使用现有算法来创建自定义检验数字
双击该条形码以打开“条形码属性”对话框。或者,右键单击条形码,然后单击“属性”。
在导航窗格中,选择包含要编码的数据的数据源。
单击数据源工具栏上的 图标,以启动“新建数据源向导”。
在“类型”列表中,选择“Visual Basic 脚本”,然后单击“完成”。
在“脚本类型”列表中,选择“单行表达式”,然后单击“在脚本编辑器中编辑”以打开脚本编辑器。
在编辑器窗格中,删除任何现有的表达式文本。
窗格中,删除任
在“脚本助理”窗格中,找到要用于替换突出显示文本(“字符串”)的数据源,然后双击该数据源。
单击“确定”,以关闭“脚本编辑器”。
使用自定义算法来创建自定义检验数字
在“脚本类型”列表中,选择“多行脚本”,然后单击“在脚本编辑器中编辑”以打开脚本编辑器。
输入自定义检验数字的计算算法,如下所示:
'Create a Mod43 check digit
charSet = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-.$/+%"
For i + 1 To Len(C39)
total = InStr(charSet, Mid(C39,i,1)) - 1 + total
Next
Value = Mid(charSet, (total Mod 43 + 1), 1)
相关主题