以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复选框  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71194)

--  作者:qianqian1530
--  发布时间:2015/7/7 9:31:00
--  复选框
Dim sdae As String = "0"
For Each rcsa As Row In Tables("项目_Table1").Rows
    If rcsa("上传").Checked Then
        sdae = sdae + 1
    End If
Next

这个要怎么修改才行呢
rcsa("上传") 是用代码生成的复选框列.


--  作者:大红袍
--  发布时间:2015/7/7 9:39:00
--  
Dim sdae As String = "0"
For Each rcsa As Row In Tables("项目_Table1").Rows
    If rcsa("上传") Then
        sdae = sdae + 1
    End If
Next