Foxtable(狐表)用户栏目专家坐堂 → 打印二维码的问题i


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

主题:打印二维码的问题i

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


加好友 发短信
等级:幼狐 帖子:68 积分:1045 威望:0 精华:0 注册:2015/7/28 11:42:00
打印二维码的问题i  发帖心情 Post By:2019/1/13 21:12:00 [只看该作者]

        Dim bar As prt.RenderBarCode
        bar.BarCodeType = BarCodeEnum.QRCode
        bar.Text = rw("字段1") & "|" & rw("字段2")
        rt.Cells(ii,c).Image = ??
  请问如何将二维码打印到报表中

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/13 23:00:00 [只看该作者]

Dim rg As prt.RenderGraphics
Dim bar As prt.RenderBarCode
bar.BarCodeType = BarCodeEnum.QRCode
bar.Text = rw("字段1") & "|" & rw("字段2")
bar.DrawOnCanvas(rg.Graphics,0,0,1)
rt.Cells(ii,c).RenderObject = rg

 回到顶部