How to replace enter to <br/>

Well, I have the following code:

<%
dim x
x="k"
response.write Replace(x,"k","<br/>")
%>

now how can I change it so instead of k it will replace enter to <br/>?

vbCrLf

<form method="post">
<textarea name="thing"></textarea>

<input type="submit">
</form>
<%
dim text
text=request.form("thing")
text=Replace(text,"vbCrLf","<br/>")
response.write text
%>
If i type in the text area:
1
1
it shows 1 1 =\

text=Replace(text,vbCrLf,"<br>")

or for XHTML
text=Replace(text,vbCrLf,"<br />")

ah, I see, thnkas :)