如何使用自动增加的十六进制序列号打印标签? (vb.net)

时间:2015-05-20 04:28:26

标签: vb.net printing

如何使用自动增量方法打印1000个标签,每个标签都有自己独特的序列号?

打印机是Avery AP 4.4

1 个答案:

答案 0 :(得分:0)

2解决方案:

解决方案1 ​​

  1. 有一个类变量来存储序列号。
  2. 创建打印文档。
  3. 在打印文档中绘制字符串(序列号变量) 的PrintPage。
  4. 调用打印此打印文档的打印方法 在一个for循环中(它可以运行多次) 增加序列并打印它)
  5. 5.将序列号增加1
  6. 其余的将通过print方法完成,该方法将触发printdocument的printpage事件,每次都会绘制一个新的序列号,因为序列号变量将增加1。

    这会创建多个打印机作业,但直到现在,它似乎没有问题。

    解决方案2(使用EPL2打印机语言)

    1. 使用如下数组创建您的EPL2代码:

         Dim RawData_array(7) As String
      RawData_array(0) = "450"
      RawData_array(1) = "#!A1"
      RawData_array(2) = "#IMS38/12.0/"
      RawData_array(3) = "#ERN"
      RawData_array(4) = "#R-3.6/-2.4"
      RawData_array(5) = "#J6#T6#YT108/0///"
      RawData_array(6) = "#J6#T24.5#YT108/0///"
      RawData_array(7) = "#Q1/"
      
    2. 创建For循环

    3. 在循环内部将序列号(作为字符串)附加到元素5和元素6的末尾

    4. 使用像这样的字符串构建器构建一个包含所有数组元素的字符串:

      For i As Integer = 0 To RawData_array.Length - 1 sb.AppendLine(RawData_array(i)) Next

    5. 将字符串发送到打印机,如下所示: RawPrinterHelper.SendStringToPrinter("Your_Printers_Name", sb.ToString)

    6. 这个第二个解决方案是我最终使用的解决方案,因为某些原因导致其更轻微

      我希望它能帮到某个人!...

      PS。此EPL2设置适用于16x8mm标签,每个标签的滚动行中都有两个标签。