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 + -
显示快捷键?