Crystal Report9 Text文本框控件 程序自动换行有关问题

Crystal Report9 Text文本框控件 程序自动换行问题
在VB6.0中用到了Crystal Report9 里创建了一个文本框控件Text。用程序往Text控件里输入字符时，怎么能实现自动换行功能？
程序如下：
  If (Val(report.CVHR.text) <= 55) Then
  report.Text62.SetText "心动过缓" '如果心率小于55则表示心电过缓
  End If
   
  If (Val(report.CVHR.text) > 100) Then
  report.Text62.SetText "心动过快"
  End If
   
  If (Val(report.CVSPTI.text) > 3500) Then
  report.Text63.SetText "心肌耗氧量增加" '如果左心负荷大于3500，则表示心肌耗氧量增加
  End If
但是输出的结果却是：如果上面三个判别语句有两个满足条件的话，在文本框Text只能显示一行即“心肌耗氧量增加”。而我想得到的是“心动过缓（下一行）心肌耗氧量增加” 或“心动过快（下一行）心肌耗氧量增加”
即换行显示。或者不用换行也可以，只要能同时将这两句话显示出来就行。
请问各位高手，怎么实现这个功能。谢谢！

[解决办法]
dim str as string

If (Val(report.CVHR.text) <= 55) Then
str = "心动过缓"
End If

If (Val(report.CVHR.text) > 100) Then
str = "心动过快"
End If

If (Val(report.CVSPTI.text) > 3500) Then
str = trim(str & "心肌耗氧量增加") 
End If
report.Text62.SetText str