textbox转换小问题,一定要帮帮忙,很急!~~~~~~~~

Question

我是这样写的,但是好像replace不了,我设了断点,看不到它replace   
帮帮忙,谢谢
Dim text1 As String = theme.Text.TrimFor i = 0 To text1.Lengthtext1 = text1.Replace("'", "''")
text1 = text1.Replace(" ", " ")
text1 = text1.Replace(Chr(10) & Chr(13), "<br/>")Next

Answer 1

Dim text1 As String = theme.Text.Trimtext1 = text1.Replace("'", "''")
text1 = text1.Replace(" ", "&nbsp;")
text1 = text1.Replace(Chr(10) & Chr(13), "<br/>")不用循环

Answer 2

我一开始是没用循环啊,但是替换不了,是怎么回事??help!