老师您好! 我想用数据表的2个-3个字段组合生成二维码,我想问的问题是:1、能否用汉字字段生成,2、在代码中怎么组合2个及以上字段。3、我存储文件时文件名,用字段内容存储。我写得代码有问题。请指教,谢谢!带颜色的三句。
Dim doc As New PrintDoc
Dim rg As prt.RenderGraphics
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.QRCode
Dim fn As String
Dim gx As string
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
For Each r As Row In Tables("工序表").Rows
bar.Code = r("工序代码")
rg = New prt.RenderGraphics
bar.DrawOnCanvas(rg.Graphics, 0, 0, 1)
rg.Style.Spacing.All = 3
Doc.Body.Children.Add(rg)
gx = r("工序代码")
fn = "d:\工序二维码\mycode &gx.jpg"
MessageBox.Show(fn)
Bar.SaveImage("fn")
Next
Doc.Preview()