📄 thecheck.aspx
字号:
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<script runat="server">
Sub btnOk_Click(sender as Object, e as EventArgs)
Dim i as integer
Dim strItems as String
For i = 0 To cblCheckList.items.Count-1
If cblCheckList.Items(i).Selected = true then
strItems += cblCheckList.Items(i).Text & "，"
End If
Next
Response.Write("您的兴趣是：")
Response.Write(strItems)
End Sub
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>使用复选框</title>
</head>
<body>
<form runat="server">
<asp:CheckBoxList ID="cblCheckList" runat="server">
<asp:listitem ID="chkCheck1" runat="server" value="看书" />
<asp:listitem ID="chkCheck2" runat="server" value="听音乐" />
<asp:listitem ID="chkCheck3" runat="server" value="看电影" />
</asp:CheckBoxList>
<asp:Button ID="btnOk" runat="server" Text="提交" OnClick ="btnOk_Click"/>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -