以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  生成的二维码图片如何让白边更少  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78137)
--  作者：santde
--  发布时间：2015/12/2 19:57:00
--  生成的二维码图片如何让白边更少
生成的二维码图片如何让白边更少



图片点击可在新窗口打开查看此主题相关图片如下：1245.png
图片点击可在新窗口打开查看

左右的白边大了点
条码生成的代码为
For Each r As Row In Tables("表A").Rows
    Dim Bar As New BarCodeBuilder
    Bar.Symbology = Barpro.Symbology.QRCode
    Dim sa As String = r("第一列")
    Bar.Code = sa
    Bar.QuietZoneWidth = 4
    bar.SaveImage("c:\\data\\"& sa & ".bmp",600)
Next
[此贴子已经被作者于2015/12/2 19:59:24编辑过]
--  作者：大红袍
--  发布时间：2015/12/2 20:06:00
--  
Bar.QuietZoneWidth = 0