VB.Net调用Codesoft条码软件打印标签

VB.Net调用Codesoft条码软件打印标签

做工控软件不免要打印标签，打印方式很多：打印图片方式，命令方式……

最简单的要数直接调用CODESOFT了。

CODESOFT可以编辑要打印的条码标签，将需要改变的文字、条码、二维码设置为变量，打印时将参数传入即可。

首先需要安装CODESOFT，并编辑好条码标签备用。

 

然后下载需要使用的库文件里面有dll文件和tlb文件，本文只介绍dll文件用法

 

新建工程，简单界面如下

 

VB.Net代码如下：

 

Imports LabelManager2

Public Class Form1

Public lbl As LabelManager2.Application
Dim strFile As String
Dim doc As Document
Dim portNames As String()

Private Sub btPrint_Click(sender As Object, e As EventArgs) Handles btPrint.Click

doc.Variables.FreeVariables.Item(“变量0”).Value = tbSn.Text

doc.PrintLabel(1, 1, 1, 1, 1, “”)
doc.FormFeed()

End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

lbl = New LabelManager2.Application()
strFile = System.Windows.Forms.Application.StartupPath.ToString() & “\S703.lab”
lbl.Documents.Open(strFile, False)

doc = lbl.ActiveDocument
doc.Printer.SwitchTo(“ZDesigner ZT410-300dpi ZPL”, “USB001”, True)

End Sub

Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing

Try
lbl.Documents.CloseAll(False)
lbl.Quit()
Catch

End Try

End Sub

End Class

 

更多关于VB.Net调用CODESOFT的示例，请大家关注CODESOFT教程。