现在碰到一个问题,就是用专业报表设计的标签在打印的时候,如果标签小的话打印不正确
现在需要打印的标签尺寸是35*25,如果采用此规格的话打印出来自动横向变味竖向
相同的代码如果标签尺寸改为100*75(我自己用的另一种标签规格)就没有任何问题
小标签要经常使用,必须要使用,请大家帮忙看看是什么问题
标签打印机型号是佳博GP3120TN
请看图
此主题相关图片如下:qq截图20140628130809.png
此主题相关图片如下:qq截图20140629155712.png
代码如下:
Dim Doc As new PrintDoc '定义一个新报表
Dim rt As New prt.RenderTable '定义一个新表格
Doc.PageSetting.Height = 35
Doc.PageSetting.Width = 25
Doc.PageSetting.LeftMargin = 0 '左边距
Doc.PageSetting.RightMargin = 0 '右边据
doc.PageSetting.BottomMargin = 0 '底边距
Doc.PageSetting.TopMargin = 0 '上边距
'Doc.PageSetting.Landscape = True '是否横向
Dim tab As Table = Tables("Daohuolist_table1")
rt.Style.Font = tab.font
rt.Rows.Count = 1 '总行数
rt.Cols.Count = 1 '总列数
rt.Height = 35
rt.Width = 25
'rt.SplitHorzBehavior = prt.SplitBehaviorEnum.Never '禁止水平分割
'rt.SplitVertBehavior = prt.SplitBehaviorEnum.Never '禁止垂直分割
rt.Style.GridLines.All = New prt.LineDef(0,Color.black) '网格线
rt.Cells(0,0).Text = "test"
Doc.Body.Children.Add(rt)
Doc.PrinterName = "TSC TTP-245"
Doc.Preview() '预览报表
[此贴子已经被作者于2014-6-29 16:08:46编辑过]