以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]条码打印 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179136) |
-- 作者:江南小镇 -- 发布时间:2022/8/9 21:27:00 -- [求助]条码打印 老师,在下面代码里怎样增加控制图片大小的代码。谢谢老师。 If e.Book.TempLate = "模板" Then If e.region = "条码管理" Then If e.DataRow Is Nothing OrElse e.DataRow.IsNull("条码一") Then \'如果是空行或者Lot列为空 Dim img As New System.Drawing.Bitmap(1,1) \'生成一个空白图片 img.Save(ProjectPath & "Images\\BarCode.gif") Else \'否则生成条形码图片 Dim Bar As New BarCodeBuilder Dim ra As New prt.RenderArea Bar.Symbology = Barpro.Symbology.Ean13 Bar.Code = e.DataRow("条码一") Bar.BarRatio = 0.3 Bar.BarHeight = 8 bar.SaveImage(ProjectPath & "Images\\BarCode.gif",300) End If
|
-- 作者:有点蓝 -- 发布时间:2022/8/9 21:46:00 -- 到标记里控制:http://www.foxtable.com/webhelp/topics/1387.htm |
-- 作者:江南小镇 -- 发布时间:2022/8/9 22:57:00 -- 老师,图片在单元格中居中怎样设置。 |
-- 作者:有点蓝 -- 发布时间:2022/8/9 22:59:00 -- execl模板里没有办法设置居中 |