Public Function ConvertString(ByVal str As String) As String
        str = str.Replace(" ", " ")
        str = str.Replace(Microsoft.VisualBasic.vbCrLf, "<br>")
        Return str
 End Function存的时候 用这个方法 
显示的时候直接 输入到页面上就可以了