📄 panel.aspx
字号:
<Html>
<Body bgcolor="White">
<H3>使用Panel控件<Hr></H3>
<title>使用Panel控件</title>
<script Language="VB" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
If Not Page.IsPostBack Then
panel2.Visible = False
panel3.Visible = False
End If
End Sub
Sub Button1_Click(sender As Object, e As EventArgs)
panel1.Visible = False
panel2.Visible = True
End Sub
Sub Button2_Click(sender As Object, e As EventArgs)
panel2.Visible = False
panel3.Visible = True
Span1.InnerHtml = "用户名: " & UserID.Text & "<BR>"
Span1.InnerHtml &= "密 码: " & Password.Text & "<BR>"
Span1.InnerHtml &= "昵称: " & Name.Text & "<BR>"
Span1.InnerHtml &= "性别：" & Tel.Text & "<BR>"
Span1.InnerHtml &= "QQ:" & mail.Text & "<BR>"
Span1.InnerHtml &= "电子邮箱:" & Addr.Text & "<P>"
End Sub
Sub Button3_Click(sender As Object, e As EventArgs)
Span1.InnerHtml &= "个人资料修改成功!"
Button3.Visible = False
End Sub
</script>
<Form runat="server">
<center>
<asp:Panel id="panel1" runat="server">
<Font><B>用户登陆</B></Font><Blockquote>
用户名：<asp:TextBox id="UserID" runat="server" Text="yang"/><p>
密 码：<asp:TextBox id="Password" TextMode="Password"
Text="888888" runat="server"/><p>
<Input Type="Button" id="Button1" value=" 登录 "
OnServerClick="Button1_Click" runat="server">
</Blockquote>
</asp:Panel>
<asp:Panel id="panel2" runat="server">
<Font><B>填写个人资料</B></Font><Blockquote>
昵称：<asp:TextBox id="Name" runat="server"/><BR>
性别：<asp:TextBox id="Tel" runat="server"/><BR>
QQ：<asp:TextBox id="mail" runat="server"/><BR>
电子邮箱：<asp:TextBox id="Addr" runat="server" Size="40" /><BR>
<Input Type="Button" id="Button2" value="提交"
OnServerClick="Button2_Click" runat="server">
</Blockquote>
</asp:Panel>
<asp:Panel id="panel3" runat="server">
<Font><B>确认填写的信息</B></Font><Blockquote>
<Span id="Span1" runat="server"/>
<Input Type="Button" id="Button3" value="完成"
OnServerClick="Button3_Click" runat="server">
</Blockquote>
</asp:Panel>
</center>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -