barcodectrl打印条码为空白？？？[

[guoyinhao0727]

 StrSql = " Select * from sysCutterInfo  Where Part_No ='" & strpn & "' and IsPr =0  Order By Cutter_ID "
  Rs.Open StrSql, CnServer, adOpenStatic, adLockReadOnly, adCmdText
             
   If Rs.RecordCount = 0 Then
      MsgBox "PN编号输入有误,请核对！", vbInformation, "Info"
      Exit Sub
   End If
   
   For PintFor = 0 To Rs.RecordCount - 1
      BarCode.value = Trim(Rs.Fields("Cutter_ID"))
      
      For Each prn In Printers     '''这是我指定打印到条码打印机上去.
         If prn.DeviceName = StrPrint Then
              Set Printer = prn
              Exit For
         End If
      Next prn
      Printer.Print BarCode.value    ''''这里是打印条码 
      Printer.EndDoc
     Rs.MoveNext
   Next

条码打印机上能打印出来，但都是空白的。。。
Printer.Print BarCode.value 我这样把命令发送给打印机有问题吗 ？请指教
谢谢！

[crackdung]

條碼？你就用這個吧

Neodynamic ThermalLabel SDK 5.0 for .NET

[恐龙抗狼]

打印出條碼，說明它可以接收到數據，應該是條碼打印的位置不對，仔細看看，有沒有設定條碼的位置？
比如打印的X,Y的位置，barcodetype。