Foxtable(狐表)用户栏目专家坐堂 → 关于打印条形码


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

主题:关于打印条形码

美女呀,离线,留言给我吧!
做自己
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:485 积分:3750 威望:0 精华:0 注册:2017/8/17 17:47:00
关于打印条形码  发帖心情 Post By:2019/10/10 7:20:00 [只看该作者]

Dim doc As New PrintDoc
Dim rg As New prt.RenderGraphics
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Dim Multi As String
Dim Values() As String

For Each r As Row In Tables("裁剪信息_Table2").Rows
    Multi = r("条形码")
    Values = Multi.split(",")
    For Index As Integer = 0 To Values.Length - 1
        bar.Code = Values(Index)
        rg = new prt.RenderGraphics
        bar.DrawOnCanvas(rg.Graphics,0,0,1)
        Doc.Body.Children.Add(rg)
    Next
Next
Doc.Preview()
我代码是这么写的,但是条形码打印,提示这样的信息,怎么回事
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
打印的内容是这样的,0SC201910-002XFS42-000,0SC201910-002XFS42-001,0SC201910-002XFS42-002,0SC201910-002XFS46-000,0SC201910-002XFS46-001,0SC201910-002XFS46-002,0SC201910-002XFS46-003,0SC201910-002XFS50-000,0SC201910-002XFS50-001,0SC201910-002XFS50-002,0SC201910-002XFS50-003
[此贴子已经被作者于2019/10/10 7:20:35编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105479 积分:536386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/10 10:10:00 [只看该作者]

For Each r As Row In Tables("裁剪信息_Table2").Rows
    Multi = r("条形码")
    Values = Multi.split(",")
    For Index As Integer = 0 To Values.Length - 1
if Values(Index) > "" then
        bar.Code = Values(Index)
        rg = new prt.RenderGraphics
        bar.DrawOnCanvas(rg.Graphics,0,0,1)
        Doc.Body.Children.Add(rg)
end if
    Next
Next

 回到顶部
美女呀,离线,留言给我吧!
做自己
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:485 积分:3750 威望:0 精华:0 注册:2017/8/17 17:47:00
  发帖心情 Post By:2019/10/10 13:19:00 [只看该作者]

打印出来的条形码后面多一位然后加的* ,怎么回事啊,在上条我的回复的最后有应该的条形码内容,跟我要打印的条形码不一样
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/10/10 13:19:32编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105479 积分:536386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/10 13:56:00 [只看该作者]

这个是你自己选的编码,改为不同的编码试试:http://www.foxtable.com/webhelp/topics/2080.htm

Bar.Symbology = Barpro.Symbology.Code39

 回到顶部
美女呀,离线,留言给我吧!
做自己
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:485 积分:3750 威望:0 精华:0 注册:2017/8/17 17:47:00
  发帖心情 Post By:2019/10/10 16:53:00 [只看该作者]

我选择哪个可以不打印其他东西,只打印我要打印的

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105479 积分:536386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/10 17:52:00 [只看该作者]

常用的是Code39

 回到顶部