主题：[求助]专业报表中引用全局变量内容内自动换行问题

我在专业报表表格中写入如下代码，在两个手机号中加入换行符，能自动换行

ym.Cells(1,1).text =  "13900000000" & vbcrlf & "13800000000"   '注意:& vbcrlf &表示换行符

但我用全局代码声明全局变量  _ShouJiHaoMa  ，然后把  "13900000000" & vbcrlf & "13800000000" 赋值给全局变量，在专业报表中进行调用，就不能换行了

ym.Cells(0,1).text =  _ShouJiHaoMa

手机号是经常变化的，每变一次就要改一次报表很麻烦

请帮看一下，有什么好方法

我用的是外部数据源 专业报表代码写在菜单 用户功能的的 打印专业报表按钮中

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:专业报表中调用全局变量调用.rar

 一样可以啊

_ShouJiHaoMa = "13900000000" & vbcrlf & "13800000000"

Dim doc As New PrintDoc '定义一个新报表
doc.PageSetting.Width = 210 '纸张宽度为100毫米
doc.PageSetting.Height = 297 '纸张高度为120毫米
Dim ym As New prt.RenderTable
ym.Style.Gridlines.All = New prt.Linedef(Color.Gray) '灰色网格线
ym.Cells(0,0).text =  "电话号码"
ym.Cells(0,1).text =  _ShouJiHaoMa
ym.Cells(1,0).text =  "电话号码"
ym.Cells(1,1).text =  "13900000000" & vbcrlf & "13800000000"
doc.Body.Children.Add(ym) '将表格加入到报表
doc.Preview()

我意思是不把 "13900000000" & vbcrlf & "13800000000"写在专业报表中，而是写在表中，然后在专业报表中通过全局代码调用，而达到换行对齐的效果

像二楼代码  电话号码改变也还是需要修改专业报表的代码，如果软甲发布后，那就不好修改啦

不可能有问题。有问题，就是你表数据有问题。

可能是我没表达清楚，我需要得到下面这样的效果，按原来的代码，实现不了

感觉这样还是有点麻烦，还是增加数据列，分别赋值全局变量来调用方便一点，只是不知定义的全局变量多了，会不会影响系统的整体运行速度