- 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=186686)
-- 发布时间：2023/5/20 10:09:00
-- 同样的二维码代码,内容不同时大小不一样
此主题相关图片如下：二维码.png
Dim ra2 As New
prt.RenderArea
ra2 =
rt.Cells(rt.Rows.Count - 1, 2).Area \'引用单元格的容器
Dim rg As
prt.RenderGraphics
Dim Bar As New
BarCodeBuilder
Bar.Symbology =
Barpro.Symbology.QRCode
ra2.Stacking =
prt.StackingRulesEnum.InlineLeftToRight \'设置容器中对象的排列方式
Bar.Code = cr("客户料号") & "*" & CStr(rq).Replace("-",
"") & "JBL*" & CStr(rq).Replace("-",
"/")
Bar.CodeAlignment =
Barpro.Alignment.BelowLeft
Bar.QRCodeModuleSize
= 0.60
Bar.QuietZoneWidth =
1 \'静区宽度(两边空白)
rg = New
prt.RenderGraphics
bar.DrawOnCanvas(rg.Graphics,
0, 0, 1)
rg.Style.Spacing.All
= 1
ra2.Children.Add(rg)
如上图,同样的代码客户料号不同时输出的二维码大小不一样,左边那个就不全了,
如何才能不管内容如何,生成的二维码大小都是一样的?
谢谢!
-- 发布时间：2023/5/20 10:42:00
--
正常现象，至于为什么，百度了：https://www.baidu.com/s?wd=%E4%BA%8C%E7%BB%B4%E7%A0%81%20%E5%A4%A7%E5%B0%8F%20%E5%86%85%E5%AE%B9
https://it.sohu.com/a/657698662_100202324
-- 发布时间：2023/5/20 11:19:00
--
那不同的内容下可以固定输出相同尺寸大小的二维码吗?
-- 发布时间：2023/5/20 11:26:00
--
尺寸大就可以，小就不一定了