以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  EXCEL批量生成条形码问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=103904)

--  作者:benwong2013
--  发布时间:2017/7/19 13:55:00
--  EXCEL批量生成条形码问题
表A为临时表,其中有一列编号,希望在excel报告中生成条形码,代码以下,会出现错误,请问如何处理?

Dim Book As New XLS.Book(ProjectPath & "Attachments\\ReportLabel.xls")
Dim fl As String = ProjectPath & "Reports\\LaberNo.xls" 
For Each r As Row In Tables("表A").Rows \'逐行生成报
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = r("编号")
Bar.BarRatio = 0.3
Bar.BarHeight = 8
bar.SaveImage(ProjectPath & "Images\\myimg.wmf",300)
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Next
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

如图,生成的代码也是错误的,请问应该如何处理?

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



--  作者:有点甜
--  发布时间:2017/7/19 14:07:00
--  

你要去编写builddetail事件的

 

http://www.foxtable.com/webhelp/scr/2338.htm

 


--  作者:benwong2013
--  发布时间:2017/7/19 16:50:00
--  
请问为什么我的条码后缀有A/B/C/D/E/H/I的字母呢?

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


--  作者:有点甜
--  发布时间:2017/7/19 17:19:00
--  

加一句 Bar.AddCheckSum = False

 

http://www.foxtable.com/webhelp/scr/2076.htm