Foxtable(狐表)用户栏目专家坐堂 → 这个代码应该放在那里才能每次都计算啊


  共有1877人关注过本帖树形打印复制链接

主题:这个代码应该放在那里才能每次都计算啊

帅哥哟,离线,有人找我吗?
zchlln
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:118 积分:1161 威望:0 精华:0 注册:2013/9/9 14:34:00
这个代码应该放在那里才能每次都计算啊  发帖心情 Post By:2016/2/4 10:00:00 [只看该作者]

 If e.Col.Name = "设备号" Then 
     Dim fdr As DataRow = DataTables("续费表").Find("设备号 = '" & e.Row("设备号") & "'")
     If fdr Is Nothing Then 
        e.DataRow("是否使用")= True
        Else
        e.DataRow("是否使用")= False

     End If 
 End If

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/4 10:01:00 [只看该作者]

DataColChanged事件

 

If e.DataCol.Name = "设备号" Then 

     Dim fdr As DataRow = DataTables("续费表").Find("设备号 = '" & e.DataRow("设备号") & "'")
     If fdr Is Nothing Then 
        e.DataRow("是否使用")= True
        Else
        e.DataRow("是否使用")= False
     End If 
 End If
[此贴子已经被作者于2016/2/4 10:01:30编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zchlln
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:118 积分:1161 威望:0 精华:0 注册:2013/9/9 14:34:00
  发帖心情 Post By:2016/2/4 10:05:00 [只看该作者]

以下是引用大红袍在2016/2/4 10:01:00的发言:

DataColChanged事件

 

If e.DataCol.Name = "设备号" Then 

     Dim fdr As DataRow = DataTables("续费表").Find("设备号 = '" & e.DataRow("设备号") & "'")
     If fdr Is Nothing Then 
        e.DataRow("是否使用")= True
        Else
        e.DataRow("是否使用")= False
     End If 
 End If
[此贴子已经被作者于2016/2/4 10:01:30编辑过]

那之前的数据如何计算呢

[此贴子已经被作者于2016/2/4 10:06:08编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/4 10:07:00 [只看该作者]


 回到顶部