- ベストアンサー
複数チェックボックスの判定について
- 「2つ以上」チェックがついていた場合の判定基準について教えてください。
- チェックボックスが複数ある場合、「2つ以上」チェックがついているかどうかを判定したいです。
- 上記のチェックボックスの記述において、2つ以上のチェックがついている場合の条件を書きたいです。
- mr-r00
- お礼率93% (480/516)
- Microsoft ASP
- 回答数1
- ありがとう数5
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
aspx は似たような感じで <%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head runat="server"> <title>無題のページ</title> </head> <body> <form id="form1" runat="server"> <div> <asp:CheckBox ID="CheckBox1" runat="server" /> <asp:CheckBox ID="CheckBox2" runat="server" /> <asp:CheckBox ID="CheckBox3" runat="server" /> <asp:CheckBox ID="CheckBox4" runat="server" /> <asp:CheckBox ID="CheckBox5" runat="server" /> <asp:Button ID="Button1" runat="server" Text="Button" /> </div> <p><asp:Label ID="Label1" runat="server" Text="Label"></asp:Label></p> </form> </body> </html> で、Default.aspx.vb のほうは Partial Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim chkCount As Integer = 0 For Each ctrl In Me.form1.Controls If TypeOf ctrl Is CheckBox Then Dim chkBox As CheckBox = DirectCast(ctrl, CheckBox) If chkBox.Checked Then chkCount += 1 End If End If Next If chkCount <> 0 Then Me.Label1.Text = chkCount.ToString() & " 個チェックがついています" End If End Sub End Class でどうでしょう。
お礼
ありがとうございました 参考にさせていただきます！