这样：
Dim doc As New PrintDoc '定义一个报表Dim rt As New prt.RenderText '定义一个文本对象rt.Text = "\[49-30]" '设置文本对象的内容doc.Body.Children.Add(rt) '将文本对象加入到报表doc.Preview() '预览
加好友 
发短信
Post By：2015/6/2 14:39:00 [显示全部帖子]
