条形码宽度会变化 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

ra = rt.cells(4,0).area

Dim rg As New prt.RenderGraphics

Dim Bar1 As New BarCodeBuilder

Bar1.Symbology = Barpro.Symbology.Code39

bar1.Code = r("客户物料编号")

rg = new prt.RenderGraphics

bar1.DrawOnCanvas(rg.Graphics,0,0,1)

ra.Children.Add(rg)

我的上述代码是要将条形码放在表格里面的，但是，因为“客户物料编号”的内容有长有短，造成条形码宽度也有长有短，长的条形码有时会超出预定的单元格边界。能否限定条形码的高度和宽度（比如20mm*10mm），然后将条形码放在指定大小的单元格里面（比如18mm*8mm），并且左右、上下都是置中放置？谢谢。

主题：条形码宽度会变化