专业报表想要这种效果:(后面的是字段值)
产品编码:DDS0506001
产品名称:光谱分析仪器(上海光学
设备厂)
但是目前是这种效果:
产品编码:DDS0506001
产品名称:光谱分析仪器(上海光学
设备厂)
能否提示如何实现?
[此贴子已经被作者于2011-6-2 11:58:09编辑过]
产品名称内容换行后对齐的问题,希望能够对齐该值的第一个字,而不是标签“产品名称:”
[此贴子已经被作者于2011-6-2 15:57:09编辑过]
以下是引用狐狸爸爸在2011-6-2 14:47:00的发言:
有差别吗,我怎么看起来是一样的。
呵呵,果真是喜欢做『简单』的事的人,什么都简单看待,简单--快乐人!
对齐不同
以下是引用狐狸爸爸在2011-6-2 16:03:00的发言:
呵呵,惭愧,用表格吧,这样方便对齐。

不行啊,客户不同意的,要用这个打印购物小piao用
[此贴子已经被作者于2011-6-2 18:19:57编辑过]
但是不晓得啥时候超过长度?
[此贴子已经被作者于2011-6-2 18:51:49编辑过]
Dim doc As New PrintDoc '定义一个报表
Dim s1,s2,s3 As String '定义字符变量
s1 = "DDS0506001"
s2 = "光谱分析仪器(上海光学设备厂)"
Dim rt1,rt2, rt3 As New prt.RenderText '
rt1.Text = "产品编码:" & s1
doc.Body.Children.Add(rt1)
rt2.Text = "产品名称:" & Left(s2,11)
doc.Body.Children.Add(rt2)
For i As Integer = 0 To "产品名称:" .Length - 1
s3 = s3 & " "
Next
rt3.Text = s3 & s2.Substring(11)
doc.Body.Children.Add(rt3)
doc.Preview() '预览
我很少玩专业报表,呵呵。 应该可以设置打印宽度,之间也应该可以计算出字符的长度,如:
产品编码:DDS0506001
产品名称:光谱分析仪器(上海光学 - 这里共有字符16个,超过后加5个(或名称长度+1)空格,应该可以的。
设备厂)