📄 gerenzhucebiaodan.txt
字号:
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
Dim day1() As String = {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30", "31"}
Dim day2() As String = {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29", "30"}
Dim day3() As String = {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28"}
Dim day4() As String = {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", "29"}
Protected Sub Button_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim birth As String
Dim sex, likestr As String
Dim i As Integer
For i = 0 To likes.Items.Count - 1
If likes.Items(i).Selected = True Then
likestr = likestr & likes.Items(i).Text & " "
End If
Next
sex = sexy.SelectedItem.Text
birth = year.SelectedItem.Text & "年" & month.SelectedItem.Text & "月" & day.SelectedItem.Text & "日"
message.InnerHtml = "你已成功提交!:<p></p>用户名:" & username.Text & "<br>姓名:" & name.Text & "<br>密码:" & password.Text & "<br>出生日期:" & birth & "<br>性别:" & sex & "<br>电话:" & phone.Text & "<br>E-mail:" & mail.Text & "<br>爱好:" & likestr & "<br>个人简介:" & personal.Text
username.Text = ""
name.Text = ""
password.Text = ""
mail.Text = ""
phone.Text = ""
year.SelectedIndex = 0
month.SelectedIndex = 0
day.SelectedIndex = 0
End Sub
Protected Sub month_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
Select Case month.SelectedItem.Text
Case "04"
day.DataSource = day2
day.DataBind()
Case "06"
day.DataSource = day2
day.DataBind()
Case "09"
day.DataSource = day2
day.DataBind()
Case "11"
day.DataSource = day2
day.DataBind()
Case "02"
If year.SelectedItem.Text = "1984" Then
day.DataSource = day4
day.DataBind()
Else
day.DataSource = day3
day.DataBind()
End If
Case Else
day.DataSource = day1
day.DataBind()
End Select
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head id="Head1" runat="server">
<title>注册表单</title>
</head>
<body>
<form id="form1" runat="server">
<div style="text-align :center ">
<span style="font-size: 14pt"><strong>注册表单</strong></span></div>
<div style="text-align :center ">
<p></p>
<table>
<tr><td style="text-align :right ;">
<asp:Label ID="Lusername" runat="server" Text="用户名:"></asp:Label></td><td style="text-align :left ;"><asp:TextBox ID="username" runat="server"></asp:TextBox></td></tr>
<tr><td style="text-align :right ;">
<asp:Label ID="Lname" runat="server" Text="姓名:"></asp:Label></td><td style="text-align :left ;"><asp:TextBox ID="name" runat="server"></asp:TextBox></td></tr>
<tr><td style="text-align :right ;">
<asp:Label ID="Lpassword" runat="server" Text="密码:"></asp:Label></td><td style="text-align :left ;"><asp:TextBox ID="password" runat="server" TextMode="Password"></asp:TextBox></td></tr>
<tr><td>
<asp:Label ID="Lbirthday" runat="server" Text="出生日期:"></asp:Label></td><td style="text-align :left ;"><asp:DropDownList ID="year" runat="server">
<asp:ListItem>1970</asp:ListItem>
<asp:ListItem>1971</asp:ListItem>
<asp:ListItem>1972</asp:ListItem>
<asp:ListItem>1973</asp:ListItem>
<asp:ListItem>1974</asp:ListItem>
<asp:ListItem>1975</asp:ListItem>
<asp:ListItem>1976</asp:ListItem>
<asp:ListItem>1977</asp:ListItem>
<asp:ListItem>1978</asp:ListItem>
<asp:ListItem>1979</asp:ListItem>
<asp:ListItem>1980</asp:ListItem>
<asp:ListItem>1981</asp:ListItem>
<asp:ListItem>1983</asp:ListItem>
<asp:ListItem>1984</asp:ListItem>
<asp:ListItem>1985</asp:ListItem>
<asp:ListItem>1986</asp:ListItem>
</asp:DropDownList>年<asp:DropDownList ID="month" runat="server" AutoPostBack="True" OnSelectedIndexChanged="month_SelectedIndexChanged">
<asp:ListItem>01</asp:ListItem>
<asp:ListItem>02</asp:ListItem>
<asp:ListItem>03</asp:ListItem>
<asp:ListItem>04</asp:ListItem>
<asp:ListItem>05</asp:ListItem>
<asp:ListItem>06</asp:ListItem>
<asp:ListItem>07</asp:ListItem>
<asp:ListItem>08</asp:ListItem>
<asp:ListItem>09</asp:ListItem>
<asp:ListItem>10</asp:ListItem>
<asp:ListItem>11</asp:ListItem>
<asp:ListItem>12</asp:ListItem>
</asp:DropDownList>月<asp:DropDownList ID="day" runat="server">
<asp:ListItem>01</asp:ListItem>
<asp:ListItem>02</asp:ListItem>
<asp:ListItem>03</asp:ListItem>
<asp:ListItem>04</asp:ListItem>
<asp:ListItem>05</asp:ListItem>
<asp:ListItem>06</asp:ListItem>
<asp:ListItem>07</asp:ListItem>
<asp:ListItem>08</asp:ListItem>
<asp:ListItem>09</asp:ListItem>
<asp:ListItem>10</asp:ListItem>
<asp:ListItem>11</asp:ListItem>
<asp:ListItem>12</asp:ListItem>
<asp:ListItem>13</asp:ListItem>
<asp:ListItem>14</asp:ListItem>
<asp:ListItem>15</asp:ListItem>
<asp:ListItem>16</asp:ListItem>
<asp:ListItem>17</asp:ListItem>
<asp:ListItem>18</asp:ListItem>
<asp:ListItem>19</asp:ListItem>
<asp:ListItem>20</asp:ListItem>
<asp:ListItem>21</asp:ListItem>
<asp:ListItem>22</asp:ListItem>
<asp:ListItem>23</asp:ListItem>
<asp:ListItem>24</asp:ListItem>
<asp:ListItem>25</asp:ListItem>
<asp:ListItem>26</asp:ListItem>
<asp:ListItem>27</asp:ListItem>
<asp:ListItem>28</asp:ListItem>
<asp:ListItem>29</asp:ListItem>
<asp:ListItem>30</asp:ListItem>
<asp:ListItem>31</asp:ListItem>
</asp:DropDownList>日</td></tr>
<tr><td style="text-align :right ;">
<asp:Label ID="Lsexy" runat="server" Text="性别:"></asp:Label></td><td style="text-align :left ;"><asp:RadioButtonList ID="sexy" runat="server" RepeatDirection="Horizontal" RepeatLayout="Flow">
<asp:ListItem Selected="True">男</asp:ListItem>
<asp:ListItem>女</asp:ListItem>
</asp:RadioButtonList></td></tr>
<tr><td style="text-align :right ;">
<asp:Label ID="Lphone" runat="server" Text="电话:"></asp:Label></td><td style="text-align :left ;"><asp:TextBox ID="phone" runat="server"></asp:TextBox></td><td>
<asp:RegularExpressionValidator ID="RegularExpressionValidator2" runat="server" ErrorMessage="RegularExpressionValidator" ControlToValidate="phone" ValidationExpression="(\(\d{3}\)|\d{3}-)?\d{8}"></asp:RegularExpressionValidator></td></tr>
<tr><td style="text-align :right ;">
<asp:Label ID="Lmail" runat="server" Text="E-mail:"></asp:Label></td><td style="text-align :left ;"><asp:TextBox ID="mail" runat="server"></asp:TextBox></td><td><asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server" ControlToValidate="mail"
ErrorMessage="RegularExpressionValidator" ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator></td></tr>
<tr><td align="right">
<asp:Label ID="Llike" runat="server" Text="职业:"></asp:Label></td><td align="left">
<asp:CheckBoxList ID="likes" runat="server" RepeatDirection="Horizontal"
RepeatLayout="Flow">
<asp:ListItem>计算机</asp:ListItem>
<asp:ListItem>教师</asp:ListItem>
<asp:ListItem>大学生</asp:ListItem>
<asp:ListItem>金融界</asp:ListItem>
</asp:CheckBoxList></td></tr>
<tr><td style="text-align :right ;">
<tr><td align="right" valign="top">
<asp:Label ID="Label2" runat="server" Text="个人简介:"></asp:Label></td><td align="left">
<asp:TextBox ID="personal" runat="server" Height="98px" TextMode="MultiLine" Width="244px"></asp:TextBox></td></tr>
</table>
<p></p>
<asp:Button ID="Button" runat="server" Text="提交" OnClick="Button_Click" />
</div>
<p></p>
<div style ="text-align :center ">
<table>
<tr>
<td style="text-align :left"><div id="message" runat="server" ></div></td>
</tr>
</table>
</div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -