我用54mm* 30mm 大小的不干胶纸打印条形码,怎么调试都不能打印到中间,怎么处理啊
代码如下
Dim doc As New PrintDoc
Dim rg As New prt.RenderGraphics
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = dr("_identify")
'MessageBox.Show(bar.code)
Bar.BarWidth = 0.4642
Bar.BarHeight = 3.08
Bar.QuietZoneWidth = 2
Bar.DisplayChecksum = False
Bar.DisplayStartStopChar = False
Bar.Font = New Font("楷体",7.5)
Bar.HumanReadableText = "ADM签样专用"
Bar.SaveImage("D:\xx.bmp")
Dim pic As WinForm.PictureBox = e.Form.Controls("PictureBox1")
pic.Image= bar.GetImage
bar.DrawOnCanvas(rg.Graphics,0,0,1)
Doc.Body.Children.Add(rg)
Doc.Preview
发现一个问题 就是 每次 打印预览 Doc.Preview 调用的纸型都不一样,怎么样控制下打印呢? 调用的纸型, 左右边距等
[此贴子已经被作者于2020/9/20 10:49:50编辑过]