[VB .NET] TSC BARCODE PRINT / QR CODE
'프린트 오픈 Call openport("TSC 4420") '라벨가로길이, 라벨세로길이, 속도, 어둡기, 0-갭/1-마크, 라벨간격, 상단여백 Call setup(X, Y, "1", sDarkNess, "0", "3", "0") '버퍼클리어 Call clearbuffer() Dim sQRBar As String sQRBar = "TEST DATA OUTPUT" Call sendcommand("QRCODE 420,80,H,2,A,0,M2,S7," + """" + sQRBar + """") '인쇄레이블수, 인쇄매수 Call printlabel("1", "1") Call closeport()
2020.05.28