简易的字符替换 可以用于用户自我介绍输入框 简单新闻回复& etc.
2016-01-29 13:17
简易的字符替换 可以用于用户自我介绍输入框 简单新闻回复& etc.,简易的字符替换，可以用于用户自我介绍输入框，简单新闻回复& etc.
sub enter_click(sender as object,e as eventargs)
Dim myString As String
myString=Request("intro") '获取表单内容
myString=Replace(myString,chr(13),"
") '替换回车符
myString=Replace(myString,chr(32)," ") '替换空格符
myString=Replace(myString,chr(9)," ") '替换Tab缩进符为4个空格
Message.Text=myString
end sub
