主题：[求助]checkbox返回值问题

一个窗口多个checkbox，每个代表不同数值，每次勾选其中若干个，则返回相加值，如何实现？

 把checkbox放在一个容器里面，这样可以遍历所有控件，方便计算。

 

 也可以把checkbox的名字设置为统一的，如 cbx_1、cbx_2、cbx_3，这样也可以方便计算。

 

 参考代码

 

Dim sum As Double = 0
For i As Integer = 1 To 3
    Dim cbx As WinForm.CheckBox = e.form.controls("cbx_" & i )
    If cbx.Checked Then
        sum += val(cbx.Text)
    End If
Next
msgbox(sum)

 

 

谢谢，我想了解就是 cbx.Text 中 text属性是指 其中的什么？ 是“”标题“”里面的内容？

或者就是在代码里 直接赋值？

 

Text指的是你【标题】的值。

 

如果你标题不是具体的数值，你也可以把值写在名称里，如 cbx_1_109 红色的109就代表这个控件的值

谢谢

Dim sum As Double = 0
For i As Integer = 1 To 3
    Dim cbx As WinForm.CheckBox = e.form.controls("cbx_" & i )
    If cbx.Checked Then
        sum += val(cbx.Text)
    End If
Next
msgbox(sum)

命名为 cbx_111、cbx_222、cbx_333

 

Dim sum As Double = 0
For Each c As object In e.Form.controls
    If c.name Like "cbx_*" Then
        Dim cbx As WinForm.CheckBox = c
        If cbx.Checked Then
            sum += val(cbx.name.split("_")(1))
        End If
    End If
Next
msgbox(sum)

cbx_1的值123.6   cbx_2 值-1.36   cbx_3的值 0.98       如果选中，值相加，也能按上面的代码实现吗？

ok可以了，是不是要在一个容器里面的才行？