简易的字符替换，可以用于用户自我介绍输入框，简单新闻回复& etc.

sub enter_click(sender as object,e as eventargs)

Dim myString As String

myString=Request('intro') '获取表单内容

myString=Replace(myString,chr(13),'<br>') '替换回车符

myString=Replace(myString,chr(32),'&nbsp;') '替换空格符

myString=Replace(myString,chr(9),'&nbsp;&nbsp;&nbsp;&nbsp;') '替换Tab缩进符为4个空格

Message.Text=myString

end sub

• ·上周技术关注：101 Samples for
• ·WEB服务代理类的使用
• ·如何实现VB和VC的联合调试
• ·winsock POP3教程（一）
• ·VB外接程序的设计- 得到VB的控制权
• ·Windows 集成的身份验证连接SQL Se
• ·[FxCop.设计规则]2. 程序集应该拥有一
• ·写asp.net论坛时用的一个技巧[原创]
• ·正确解析以逗号分割的CSV文件
• ·互操作