5-6.aspx
来自「asp做的新闻系统」· ASPX 代码 · 共 45 行
ASPX
45 行
<html>
<head>
<script language="VB" runat="server">
'响应按钮事件
Sub Button1_Click(sender As Object, e As EventArgs)
Dim s As String = "被选择的选项是:<br>"
Dim i As Int32
For i = 0 to Check1.Items.Count-1
If Check1.Items(i).Selected Then
'列出选择项
s = s & Check1.Items(i).Text
s = s & "<br>"
End If
Next
'打印出选择项
Label1.Text = s
End Sub
</script>
</head>
<body bgcolor="#ffffff">
<br><br><br>
<center>
<h3><font face="Verdana">CheckBoxList实例</font></h3>
</center>
<br><br>
<center>
<form runat=server>
'选择象列表
<asp:CheckBoxList id=Check1 runat="server">
<asp:ListItem>北京</asp:ListItem>
<asp:ListItem>深圳</asp:ListItem>
<asp:ListItem>上海</asp:ListItem>
<asp:ListItem>广州</asp:ListItem>
<asp:ListItem>南宁</asp:ListItem>
<asp:ListItem>重庆</asp:ListItem>
</asp:CheckBoxList>
<p>
<asp:Button id=Button1 Text="提交" onclick="Button1_Click" runat="server"/>
<p>
<asp:Label id=Label1 font-name="Verdana" font-size="8pt" runat="server"/>
</form>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?