以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  审批权限  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=129479)
--  作者：有点蓝
--  发布时间：2018/12/29 11:49:00
--  
For i As Integer = t.TopPosition To t.BottomPosition

改为

1、如果是当前页面

For i As Integer =0 To t.rows.count-1

2、如果是复选框的某几行
dim drs as list(of row) = t.GetCheckedRows
For i As Integer =0 To drs.count-1
--  作者：有点甜
--  发布时间：2019/1/2 12:29:00
--  

For i as integer = 0 to e.form.controls("采购申请明细").Table.rows.count-1

    e.form.controls("采购申请明细").Table.position = i

    dim r as row = e.form.controls("采购申请明细").Table.rows(i)
    If r.checked = True Then
        r("需审核人") = e.form.controls("姓名3").Text
    End If
Next