Foxtable(狐表)用户栏目专家坐堂 → 关于BarCodeBuilder用法报错


  共有8716人关注过本帖树形打印复制链接

主题:关于BarCodeBuilder用法报错

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/4 15:55:00 [显示全部帖子]

将dr("运单号")的值是什么,贴出实际的值,我来测试一下看看

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/4 16:24:00 [显示全部帖子]

条码是有规范的,不是随便一个值都可以的

 

Dim Doc As New PrintDoc
Dim rt As new prt.RenderTable
Dim rm As new prt.RenderImage
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Ean13
Bar.BarRatio = 0.3
bar.Code = "690123456789"
rm.Height = 60
rm.Width = 160
rm.Image = bar.GetImage()
rt.Cells(0,0).RenderObject = rm
Doc.Body.ChildRen.Add(rt) '将容器加入到报表中
Doc.Preview


 回到顶部