
<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
   p1.InnerHtml = "<b>您写的是：</b> " & textarea1.Value
End Sub
</script>

<html>
<body>

<form runat="server">
请输入文本：<br />
<textarea id="textarea1" cols="35" rows="6" runat="server" />
<input type="submit" value="提交" OnServerClick="submit" runat="server" />
<p id="p1" runat="server" />
</form>

</body>
</html>