📄 2-19.aspx
字号:
<Html>
<Form Runat="Server" ID=Form1></head>
请输入你的建议:
<br>
<TextArea Id="TextArea1" Runat="Server" Cols="30" Rows="5"></TextArea>
<Input Type="button" ID="Button1" Runat="Server"
OnServerClick="Button1_Click" Value="确定">
</FORM>
<Span ID="Sp1" Runat="Server"/>
<Script Language="VB" Runat="Server" ID=Script1>
Sub Button1_Click(Sender As Object, e As EventArgs)
Sp1.InnerHtml="您输入的建议是:<br>" & _
Replace(TextArea1.Value,Chr(13),"<br>")
End Sub
</SCRIPT>
</Html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -