webevent.aspx

来自「用VB实现」· ASPX 代码 · 共 30 行

ASPX
30
字号
<%@ Page Language="VB" ContentType="text/html" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<Script runat="server">

Sub btnH_Click(Sender AS Object , E as EventArgs)
 If txtMessage.Visible = True Then 
    txtMessage.Visible = false 
    btnH.Text = "显示" & txtMessage.Text
 Else 
    txtMessage.Visible = True 
    btnH.Text = "隐藏" & txtMessage.Text
 End If
End Sub

</Script>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>WEB事件</title>
</head>
<body>

<Form runat="server">
<asp:TextBox ID="txtMessage" runat="server" Text="信息框" />
<asp:Button ID="btnH" runat="server" Text="隐藏信息框" OnClick="btnH_Click"/>
</Form>

</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?