官方微信 |官方微博|設(shè)為首頁|添加收藏 |聯(lián)系我們
全國服務(wù)熱線:13713178909
專注條碼技術(shù)19年
條碼系統(tǒng)應(yīng)用集成服務(wù)提供商
一、直接利用有條形碼打印功能的打印機(jī)
有許多打印機(jī)能夠直接打印條形碼,但在VB中,我們在DOS時(shí)代熟悉的LPRINT語句已經(jīng)不能再使用了,打印操作被Windows的Spool系統(tǒng)完全接管,輸出是以“頁”為單位,所有的打印輸出都被Windows轉(zhuǎn)換為圖形發(fā)送給打印驅(qū)動(dòng)程序。而要使打印機(jī)打印條形碼就必須將對(duì)應(yīng)的ESC序列直接發(fā)送給它,因此我們就要想辦法避開Windows的Spool系統(tǒng),也就是說再程序中不能使用Printer對(duì)象和Printers集合處理打印輸出,在VB中要將ESC指令直接發(fā)送給打印機(jī)至少有三種方法,前兩種方法是調(diào)用WindowsAPI函數(shù):Escape()和SpoolFile(),第三種是最容易的方法:打開打印機(jī)端口進(jìn)行二進(jìn)制存取,我們主要考慮這種方法。
即使在Windows時(shí)代,”LPT1:”和”PRN”仍然是可用的,下面我們先作一個(gè)試驗(yàn):打開一個(gè)DOS窗口,在提示符下輸入COPYCONLPT1:回車,然后隨便輸入一些字符,最后按F6鍵,打印機(jī)就開始工作了,它將打印出你輸入的那些字符!下面的代碼演示了直接將指令和字符發(fā)送給打印機(jī):
Private Sub Command1_Click()
Dim strOut As String
StrOut=“這是直接發(fā)送到打印機(jī)端口的字符串”
‘打開打印機(jī)端口,其中的”LPT1:”可能需要根據(jù)你的打印機(jī)設(shè)置而改變
Open“LPT1:”For BinaryAccessWrite As #1
‘發(fā)送給打印機(jī),注意語句的最后一個(gè)參數(shù)必須是變量
Put #1,,strOut
‘關(guān)閉打印機(jī)端口
Close #1
End Sub
各種打印機(jī)打印條形碼的指令可能不同,比如將上面的變量strOut賦值為:
strOut=Chr(28)&“P”&Chr(5)&Chr(2)&Chr(3)&Chr(3)&Chr(6)&“012345”
將在AR2400打印機(jī)上打印出內(nèi)容為”012345”的CODE39格式的條形碼。具體的打印控制指令請(qǐng)參考打印機(jī)手冊。
用這種方法的缺點(diǎn):一是過份依賴打印機(jī)本身,而有條形碼打印功能的打印機(jī)通常要比普通打印機(jī)昂貴,這會(huì)使構(gòu)造應(yīng)用系統(tǒng)不夠經(jīng)濟(jì)二是所有的打印輸出都必須你自己處理,比如打印定位就很浪費(fèi)時(shí)間。
二、利用畫圖方式輸出到普通打印機(jī)
條形碼的編碼規(guī)則不外乎是通過線條和線條間間隙的寬窄不同來表示二進(jìn)制的1和0,只要我們了解了條形碼的編碼規(guī)則,完全可以用畫圖的方式在普通打印機(jī)上得到可以接受的效果。下面我們就使用最普遍的CODE39碼進(jìn)行討論。
CODE39碼的編碼規(guī)則是:
1、每五條線表示一個(gè)字符
2、粗線表示1,細(xì)線表示0
3、線條間的間隙寬的表示1,窄的表示0
4、五條線加上它們之間的四條間隙就是九位二進(jìn)制編碼,而且這九位中必定有三位是1,所以稱為39碼
5、條形碼的首尾各一個(gè)*標(biāo)識(shí)開始和結(jié)束
在我們的程序中,給常用的字符都進(jìn)行編碼,解讀時(shí)先取線條粗細(xì),再取間隙寬窄,如:
上圖中的字符*就可以解讀為001101000,字符3解讀為110000100
下面就是我們給出的子過程:
注釋:將字符串strBarCode對(duì)應(yīng)的條形碼輸出到缺省打印機(jī)
Private Sub PrintBarCode(_ByVal strBarCode As String,_Optional ByVal intXPos As Integer=0,_
Optional ByVal intYPos As Integer=0,_Optional ByVal intPrintHeight As Integer=10,_
Optional ByVal bolPrintText As Boolean=True_)
注釋:參數(shù)說明:
注釋:strBarCode-要打印的條形碼字符串
注釋:intXPos,intYPos-打印條形碼的左上角坐標(biāo)(缺省為(0,0),坐標(biāo)刻度為:毫米)
注釋:intHeight-打印高度(缺省為一厘米,坐標(biāo)刻度為:毫米)
注釋:bolPrintText-是否打印人工識(shí)別字符(缺省為true)
注釋:初始化條碼編碼格式表
strBarTable(0)="001100100"注釋:0
strBarTable(1)="100010100"注釋:1
strBarTable(2)="010010100"注釋:2
strBarTable(3)="110000100"注釋:3
strBarTable(4)="001010100"注釋:4
strBarTable(5)="101000100"注釋:5
strBarTable(6)="011000100"注釋:6
strBarTable(7)="000110100"注釋:7
strBarTable(8)="100100100"注釋:8
strBarTable(9)="010100100"注釋:9
strBarTable(10)="100010010"注釋:A
strBarTable(11)="010010010"注釋:B
strBarTable(12)="110000010"注釋:C
strBarTable(13)="001010010"注釋:D
strBarTable(14)="101000010"注釋:E
strBarTable(15)="011000010"注釋:F
strBarTable(16)="000110010"注釋:G
strBarTable(17)="100100010"注釋:H
strBarTable(18)="010100010"注釋:I
注釋:"0"-"9","A-Z","-","%","$"和"*"的條碼編碼格式,總共40個(gè)字符
StaticstrBarTable(39)AsString
條形碼作為一種機(jī)器可識(shí)別的圖形,它能快速、準(zhǔn)確地標(biāo)識(shí)某種產(chǎn)品或商品,在許多數(shù)據(jù)庫應(yīng)用中起作很重要的作用,如超市收銀、車站售票等場合。當(dāng)某件物品上帶有的條形碼被條碼掃描器正確解讀后,將會(huì)得到該物品的唯一標(biāo)識(shí)字符串,通過檢索數(shù)據(jù)庫我們就可以很容易知道它的一些其它屬性并作相應(yīng)處理。雖然在Internet上能找到許多免費(fèi)和不免費(fèi)的條形碼打印控件,但是這些控件除了使用不方便外,還有一個(gè)最大的缺點(diǎn):它們的打印輸出不能和我們的程序共存在一個(gè)打印頁面上,比如說在一個(gè)過程中,我們先向系統(tǒng)Printer中輸出一些內(nèi)容,然后再調(diào)用控件的條形碼打印方法,最后打印的結(jié)果為兩頁!,如果現(xiàn)在我們要處理一張車票,上面不僅要打印條形碼,還要有終點(diǎn)站和票價(jià)等信息,那么控件就變得不可用。對(duì)程序員來說,可能還是希望能了解條形碼打印的原理。