主题：条码无法扫描的问题

 从bar.GetImage后，尽量不要再调整宽高等，这样试试。

 试试用下面这个打印，看是否识别。如果识别，就修改你原先的代码；如果不识别，可能就是扫描枪或者打印机的问题了。

 http://www.foxtable.com/help/topics/2076.htm

 楼主，删简你的代码，留有最精炼的代码，测试，然后慢慢添加代码。这样去排错。

 img = new prt.RenderImage
 img.Image = bar.GetImage

 对于条形码，先用这两句。

把代码删减到最简单。例如下面那样，这样如果可以，就慢慢加入你要的代码。一步一步就知道哪里错了。

Dim doc As New PrintDoc
Dim img As prt.RenderImage
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.BarRatio = 0.3
Bar.BarHeight = 8
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
bar.Code = "111222333"
img = new prt.RenderImage
img.Image = bar.GetImage
Doc.Body.Children.Add(img)
Doc.Preview()