送分:小问题"回车换行符"

goincsdn 2003-07-29 10:28:55
几个字符串变量
相互连接付值给另一个字符串变量
但我想每接一个字符串加一个回车换行符
就像这个问题本身一样
谢谢!!
...全文
33 9 打赏 收藏 举报
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
fq_ln 2003-07-29
  • 打赏
  • 举报
回复
不同的目的有不同的换行方法。
按照以上大家说的就可以啦。
如果你在网页中使用,本人不推荐用<br>这种东西,如果你的内容是由别人填写的,会有很大的安全漏洞,他也可以在这里面写教本!
goincsdn 2003-07-29
  • 打赏
  • 举报
回复
感谢:standy(天下无双) 和众各位
cegcegceg 2003-07-29
  • 打赏
  • 举报
回复
str1+chr(10)+chr(13)+str2
syl13396 2003-07-29
  • 打赏
  • 举报
回复
new_string = string1 + "\r\n" + string2
\r --> 回车
\n --> 换行
standy 2003-07-29
  • 打赏
  • 举报
回复
不知道你的目的是什麼

如果只是為了顯示在WEB頁上換行,為甚麼不

string a,b;
a="testa";
b="testb";
string c=string.Empty
c=c+a+"<b>";
c=c+b+"<b>";
//..........
  • 打赏
  • 举报
回复
Function EText(ByVal strText As String)
Dim i As Integer
Dim strTemp As String
For i = 1 To Len(strText)
If Asc(Mid(strText, i, 1)) = 32 Then
strTemp = strTemp + " "
ElseIf Asc(Mid(strText, i, 1)) = 13 Then
strTemp = strTemp + "<br>"
Else
strTemp = strTemp + Mid(strText, i, 1)

End If
Next
EText = strTemp
End Function
Function DText(ByVal strText As String)
Dim strTmp As String
Dim Skip As Integer = 0
Dim i As Integer
For i = 1 To Len(strText)
If Mid(strText, i, 6) = " " Then
Skip = 6
strTmp = strTmp + " "
ElseIf Mid(strText, i, 4) = "<br>" Then
Skip = 4
strTmp = strTmp + Chr(13)
Else
If Skip = 0 Then strTmp = strTmp + Mid(strText, i, 1)
End If
If Skip > 0 Then Skip -= 1
Next
DText = strTmp
End Function
cyp503 2003-07-29
  • 打赏
  • 举报
回复
string string3="string1"+"\n"+"string2";
ifengfeng 2003-07-29
  • 打赏
  • 举报
回复
"aaaa\n"
latahu 2003-07-29
  • 打赏
  • 举报
回复
"a"+"\n"+"b"

这样不知道可不可以
相关推荐
发帖
.NET社区

6.1w+

社区成员

.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
帖子事件
创建了帖子
2003-07-29 10:28
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。