- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 有哪位有制作过条码打印，请指教！ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=5478)
-- 发布时间：2009/12/14 15:22:00
-- 有哪位有制作过条码打印，请指教！
现使用条码打印出来的线条，有的是点线，有的是波浪费。不知是何原因？如果用网上下载的条码打印程序打印的条码，正常。
代码如下：请高手指点哪里有问题
Dim doc As New PrintDoc() \'定义一个报表
Doc.PageSetting.LeftMargin = 5
Doc.PageSetting.RightMargin = 3
Doc.PageSetting.TopMargin = 10
Dim rw As row = Tables("库存捆包查询_Table1").current
doc.PageSetting.Width = 80 \'纸张宽度为100毫米
doc.PageSetting.Height = 50
doc.PageSetting.Landscape = true \'横向打印
\' doc.PageSetting.Width = 80 \'纸张宽度为100毫米
\' doc.PageSetting.Height = 50
Dim rbc As New prt.RenderBarCode()
rbc.Width = 60
rbc.Height = 40
rbc.BarCodeType = BarCodeEnum.Code39
rbc.BarDirection = BarDirectionEnum.Normal
rbc.Text = rw("捆包号")
rbc.ShowText = false
doc.Body.Children.Add(rbc)
Doc.Preview()
-- 发布时间：2009/12/14 15:46:00
--
请老大，看看！上面打印预览时发现有重影，是怎么回事呀？谢谢
此主题相关图片如下：11.jpg
-- 发布时间：2009/12/14 16:53:00
--
你缩小到100％看看，我看你都到1000％
-- 发布时间：2009/12/14 17:01:00
--
是的。因为打印出来有点线和波浪线，所以把预览扩大到1000%，请问杨版主能否判断问题出在哪吗？较急！谢谢！！！
-- 发布时间：2009/12/15 8:40:00
--
呀，没有哪位打印条码的吗？请帮忙呀。非常各位谢谢了！
-- 发布时间：2009/12/15 9:46:00
--
以下是引用baoxyang在2009-12-14 17:01:00的发言：
是的。因为打印出来有点线和波浪线，所以把预览扩大到1000%，请问杨版主能否判断问题出在哪吗？较急！谢谢！！！
是的。因为打印出来有点线和波浪线，所以把预览扩大到1000%，请问杨版主能否判断问题出在哪吗？较急！谢谢！！！
我也不清楚是什么问题