主题：关于一列中多行内容的显示与合并

重新整理一下数据。去掉回车已经在以前的帖子回复

For Each r As Row In Tables("表A").Rows
    Dim s As String = ""
    For i As Integer = 0 To r("简历").Length - 1
        If asc(r("简历")(i)) = 10 AndAlso asc(r("简历")(i-1)) <> 13 Then
            s &= vbcrlf
        Else
            s &= r("简历")(i)
        End If
    Next
    r("简历") = s
Next

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=73808&skin=0

1、提示出错是什么提示？例子说明。