条形码EAN-13码和EAN-8码的原理

条形码EAN-13码简介(数字组成):1、EAN-13码是EAN码中的一个种,用13个字符表示信息,主要包含商品的名称、型号、生产厂商和所有国家地区信息等。2、EAN-13码的格式介绍('6921734944573',这里我用笔上的条形码做例子,从左到右排序)  a.制造码('692',第1到第3位构成):   赋码权在国际物品编码协会,如69代表中国大陆,471代表...
摘要由CSDN通过智能技术生成

条形码EAN-13码简介(数字组成):

 1、EAN-13码是EAN码中的一个种,用13个字符表示信息,主要包含商品的名称、型号、生产厂商和所有国家地区信息等。

 2、EAN-13码的格式介绍('6921734944573',这里我用笔上的条形码做例子,从左到右排序)

  a.制造码('692',第1到第3位构成):

   赋码权在国际物品编码协会,如69代表中国大陆,471代表中国台湾地区,489代表香港特区,00-09代表美国、加拿大,45、49代表日本。

  b.制造商代码('1734',第4到第7位构成):

   赋码权在各个国家或地区的物品编码组织,中国由国家物品编码中心赋予制造厂商代码。

  c.商品标识代码('94457',第8到第12位构成):

   赋码权由产品生产企业自己行使,可以组成1万个不同的商品代码。

  d.校验码('3',第13位构成):

    第13位码是用来保证条形码识别的正确性,由前12位数字按照一定规则计算出来,读取出前12位按照规则计算出的值跟第13位不符合,则表示读取失败。

    

 

  • 1
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
VBA是一种用于Microsoft Office应用程序的编程语言,可以用于处理和操作Excel、Access、Word等文档和数据。而EAN-13(European Article Number 13)是一种全球通用的商品条系统,用于唯一标识和跟踪商品。 在VBA中,可以使用一些内置的函数和方法来处理和生成EAN-13。下面是一个简单的示例: 首先,我们需要在Excel中创建一个单元格,用于输入要生成条的商品编号。然后,在VBA代中,可以使用如下函数来生成EAN-13: ```vba Function GenerateEAN13Barcode(ByVal productCode As String) As String Dim checkDigit As Integer Dim encodedDigits As String ' 检查输入的商品编号是否为12位数字 If Not IsNumeric(productCode) Or Len(productCode) <> 12 Then GenerateEAN13Barcode = "输入的商品编号无效!" Exit Function End If ' 计算校验位 checkDigit = CalculateEAN13CheckDigit(productCode) ' 编商品编号和校验位 encodedDigits = productCode & checkDigit GenerateEAN13Barcode = encodedDigits End Function Function CalculateEAN13CheckDigit(ByVal code As String) As Integer Dim i As Integer Dim digit As Integer Dim total As Integer ' 遍历商品编号的每一位数字 For i = 1 To 12 digit = Mid(code, i, 1) ' 偶数位数字乘以3,奇数位数字乘以1 If i Mod 2 = 0 Then total = total + digit * 3 Else total = total + digit End If Next i ' 计算校验位 CalculateEAN13CheckDigit = (10 - total Mod 10) Mod 10 End Function ``` 以上代中,`GenerateEAN13Barcode`函数会接收一个12位的商品编号,并根据校验位计算生成13位的EAN-13。`CalculateEAN13CheckDigit`函数用于计算校验位。 在Excel的单元格中,可以使用VBA的`=GenerateEAN13Barcode(A1)`函数来生成EAN-13,其中A1为输入的商品编号单元格。执行该函数后,会在相应的单元格中显示生成的EAN-13。 通过以上的VBA代,我们可以在Excel中使用VBA函数来生成EAN-13,方便实现商品条的生成和处理。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值