用代码生成 二维码的时候 , 发现 保存的图片 尺寸不固定 有没有办法让她固定呢??
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.QRCode
Bar.QuietZoneWidth = 2
Bar.QRCodeByteEncodingName = "utf-8"
For Each r As Row In Tables("A_数据_Yahooショッピング").Rows
Bar.Code = "http://teststr.shopping.yahoo.co.jp/tkmall/" & r("code") & ".html"
Bar.SaveImage(ProjectPath & "Data\Twocode\" & r("code") & ".png",100)
Next
基本是两个尺寸 一个是 171*159 和 154*142
我想要 154*142 统一这个尺寸的
[此贴子已经被作者于2015-1-28 15:43:58编辑过]