- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 生成的一维条码，如何旋转角度 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151780)
-- 发布时间：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()
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
-- 发布时间：2020/7/3 11:31:00
--
谢谢大师指点！