📄 ch09-04-02.aspx
字号:
<Html>
<Head>
<Title>Ch09-04-02.aspx 表单回发的AutoPostBack属性</Title>
<Script Language="VB" Runat="Server" >
Sub Page_Load(Obj As Object, e As EventArgs)
Dim strA As String
If IsPostBack Then
If UserName.Text <> "请输入姓名" And _
Trim(UserName.Text) <> "" Then
strA = UserName.Text & Male1.SelectedItem.Text & "您好！"
Else
UserName.Text = "请输入姓名"
End If
strA = strA & "<Br>触发Page_Load事件"
Else
UserName.Text = "请输入姓名"
End If
Show1.Text = Show1.Text & "<Br>" & strA
End Sub
Sub Change_Male(Obj As Object, e As EventArgs)
Dim strA As String
strA = Show1.Text
strA = strA & "<BR>触发OnSelectedIndexChanged事件"
strA = strA & "(" & Male1.SelectedItem.Text & ")"
Show1.Text = strA
End Sub
</Script>
</Head>
<Body>
<H4>表单回发的AutoPostBack属性</H4>
<Form Runat="Server">
姓名：
<asp:TextBox ID="UserName" Runat="Server" />
性别：
<asp:DropDownList ID="Male1" Width="100px"
AutoPostBack="True"
OnSelectedIndexChanged="Change_Male"
Runat="Server">
<asp:ListItem Text="先生" Value="先生" />
<asp:ListItem Text="小姐" Value="小姐" />
</asp:DropDownList>
<asp:Button ID="Button1" Text="提交" Runat="Server" /><P>
<asp:Label ID="Show1" BorderStyle="Solid"
BorderWidth="1" BorderColor="#FF8888"
Runat="Server" />
</Form>
</Body>
</Html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -