专业报表打印标签的方向问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

标签预览正常（预览的效果就是最终想要的），但打印后与标签呈90度角，且横跨两个标签

代码：

Dim doc As New PrintDoc '定义一个新报表

doc.PageSetting.Height = 32 '标签纸高

doc.PageSetting.Width = 52 '标签纸宽

doc.PageSetting.Landscape = True ‘调整过

doc.PageSetting.LeftMargin = 1 '设置左边距

doc.PageSetting.RightMargin = 1 '设置右边距

doc.PageSetting.TopMargin = 1 '设置上边距

doc.PageSetting.BottomMargin = 1 '设置下边距

doc.AutoRotate = False '调整过

Dim rx As prt.RenderText

Dim rm As prt.RenderEmpty '定一个空对象

rm = new prt.RenderEmpty '定义一个新的空对象

rm.BreakBefore = prt.BreakEnum.Page '打印前换页

doc.Body.Children.Add(rm) '加入到报表中

rx = New prt.RenderText

rx.Text = "同协制造"

rx.Style.Font = New Font("黑体",14)

rx.X = 2

rx.Y = 3

Doc.Body.Children.Add(rx)

rx = New prt.RenderText

rx.Text = " No：513070001"

rx.Style.Font = New Font("宋体",12)

rx.X = 2

rx.Y = 9

Doc.Body.Children.Add(rx)

rx = New prt.RenderText

rx.Text = "用户：用户姓名"

rx.Style.Font = New Font("宋体",12)

rx.X = 2

rx.Y = 14

Doc.Body.Children.Add(rx)

rx = New prt.RenderText

rx.Text = "衣柜"

rx.Style.Font = New Font("宋体",12)

rx.X = 2

rx.Y = 22

Doc.Body.Children.Add(rx)

doc.Preview()

条码打印机用的是TDP-245驱动程序。使用 BarTender 条码打印软件时，一切正常，但在专业报表中，文字方向总是不对，请高手看下，还有哪些地方需要调整。
图片点击可在新窗口打开查看

此主题相关图片如下：bq.jpg

[此贴子已经被作者于2013-8-4 17:29:12编辑过]

主题：专业报表打印标签的方向问题