以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  生成的一维条码,如何旋转角度  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=151780)

--  作者:lanbor
--  发布时间:2020/7/3 11:16:00
--  生成的一维条码,如何旋转角度
生成的一维条码,如何用语句旋转角度
请帮忙在下面的样本中加上旋转角度90代码
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

For
 Each r As Row In Tables("表A").Rows
    bar.Code = r(
"条码")
    img = new prt.RenderImage
    img.Image = bar.GetImage
    Doc.Body.Children.Add(img)

Next

Doc.Preview()

--  作者:有点蓝
--  发布时间:2020/7/3 11:29:00
--  
Bar.Rotate = Barpro.Rotate.Degree90


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


--  作者:lanbor
--  发布时间:2020/7/3 11:31:00
--  
谢谢大师指点!