以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  点击两次才能上屏  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135064)
--  作者：y2287958
--  发布时间：2019/5/16 10:29:00
--  
上传实例
--  作者：有点甜
--  发布时间：2019/5/16 10:48:00
--  

1、单独做一个窗口，做这个功能，是否也不正常？

 

2、不正常的例子发上来测试。
--  作者：有点甜
--  发布时间：2019/5/17 9:11:00
--  

 

你这个代码写在什么事件？

 

 
--  作者：有点甜
--  发布时间：2019/5/17 9:54:00
--  

 

单独做一个对应的例子发上来测试。

 

 
--  作者：有点甜
--  发布时间：2019/5/17 11:02:00
--  

 

我测试没问题，请说明测试步骤和测试出来的问题。

 

 
--  作者：有点甜
--  发布时间：2019/5/17 16:05:00
--  
systemready = False
e.form.controls("任务明细").Table.current("第三列") = e.sender.text
For i As Integer = 0 To e.form.controls("任务明细").Table.rows.count-1
    Dim r As Row = e.form.controls("任务明细").Table.rows(i)
    If r.checked = True Then
        r("第一列") = 2
        r("第二列") = Date.Today()
    End If
Next
systemready = True