BarCode Reader SDK使用教程:用VB6实现条码的生成和读取

如何用VB6生成和读取条码?今天给大家分享两段VB6代码,关于在BarCode Reader SDK条码的生成和读取。

生成条码:

Set <span data-scayt_word="bc" data-scayt)

' set <span data-scayt_word="symbology" data-scayt>Code39</span>
bc.Symbology = 1 ' 1 = <span data-scayt_word="Code39" data-scayt>symbology</span> type

' set barcode value to encode
bc.Value = "012345"

bc.SaveImage "Code39.png"

Set <span data-scayt_word="bc" data-scayt>bc</span> = Nothing

  

读取条码:

Set <span data-scayt_word="bc" data-scayt)

' limit to <span data-scayt_word="1D" data-scayt>2d</span> are not included to speed up search)
bc.TypeToFind = 2066431 ' 2066431=SymbologyFilter.FindAll1D

bc.ReadFromFile "Code39.png"

For i = 0 To bc.FoundCount - 1
<span data-scayt_word="Msgbox" data-scayt & bc.GetFoundBarcodeValue(i)

Next

Set <span data-scayt_word="bc" data-scayt>bc</span> = Nothing

  

本文译自BarCode