在HTML中怎么让输出文字换行啊???

时间:2022-07-15 23:47:15
在HTML中怎么让输出的文字换行啊。当然不是满一行自动换行那种!

5 个解决方案

#1


<br>

#2


加<br>就可以了

#3


</br>,
有的时候可以自动换行啊。
或者另起一段<p>....</p>

#4


'*******************************************************************
'转换HTML代码
'*******************************************************************
Function HTMLEncode(reString) 
 Dim Str:Str=reString
 If Not IsNull(Str) Then
  Str = UnCheckStr(Str)
  Str = Replace(Str, "&", "&amp;")
  Str = Replace(Str, ">", "&gt;")
  Str = Replace(Str, "<", "&lt;")
  Str = Replace(Str, CHR(32), "&nbsp;")
     Str = Replace(Str, CHR(9), "&nbsp;&nbsp;&nbsp;&nbsp;")
  Str = Replace(Str, CHR(9), "&#160;&#160;&#160;&#160;")
  Str = Replace(Str, CHR(34),"&quot;")
  Str = Replace(Str, CHR(39),"&#39;")
  Str = Replace(Str, CHR(13), "")
  Str = Replace(Str, CHR(10), "<br>")
  HTMLEncode = Str
 End If
End Function

#5


多谢了,明白了~~~

#1


<br>

#2


加<br>就可以了

#3


</br>,
有的时候可以自动换行啊。
或者另起一段<p>....</p>

#4


'*******************************************************************
'转换HTML代码
'*******************************************************************
Function HTMLEncode(reString) 
 Dim Str:Str=reString
 If Not IsNull(Str) Then
  Str = UnCheckStr(Str)
  Str = Replace(Str, "&", "&amp;")
  Str = Replace(Str, ">", "&gt;")
  Str = Replace(Str, "<", "&lt;")
  Str = Replace(Str, CHR(32), "&nbsp;")
     Str = Replace(Str, CHR(9), "&nbsp;&nbsp;&nbsp;&nbsp;")
  Str = Replace(Str, CHR(9), "&#160;&#160;&#160;&#160;")
  Str = Replace(Str, CHR(34),"&quot;")
  Str = Replace(Str, CHR(39),"&#39;")
  Str = Replace(Str, CHR(13), "")
  Str = Replace(Str, CHR(10), "<br>")
  HTMLEncode = Str
 End If
End Function

#5


多谢了,明白了~~~