Sub submit(sender As Object, e As EventArgs)
p1.InnerHtml = "<b>您写的是:</b> " & textarea1.Value
<textarea id="textarea1" cols="35" rows="6" runat="server" />
<input type="submit" value="提交" OnServerClick="submit" runat="server" />
<p id="p1" runat="server" />