Dim myStr myStr = "换行后显示剩余的部分" Response.Write(CutStr(myStr)) Function CutStr(Str) '第4个字符后换行 CutStr = Left(Str,4) & "<br>" & Right(Str,Len(Str) - 4) End Function
28,390
社区成员
357,060
社区内容
加载中
试试用AI创作助手写篇文章吧