Foxtable(狐表)用户栏目专家坐堂 → [讨论] datacolchanged 时间问题


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

主题:[讨论] datacolchanged 时间问题

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


加好友 发短信
等级:九尾狐 帖子:2239 积分:18446 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2018/3/1 21:56:00 [显示全部帖子]


If e.DataCol.Name = "已结算" Then 
      If e.DataRow ("结算时间") Is Nothing Then
          e.DataRow ("结算时间") = Date.Today()
      End If
        e.DataRow.Locked = True
End If
[此贴子已经被作者于2018/3/1 22:07:16编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2239 积分:18446 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2018/3/1 22:08:00 [显示全部帖子]

如果已经结算,那么结算时间这一列就赋当天日期。
如果没有结算呢?不赋值?


Select Case e.DataCol.Name
    Case "JS"
        If e.DataRow("JS") = True AndAlso e.DataRow.IsNull("JSSJ") = True  Then
            e.DataRow("JSSJ") = Date.Today()
        End If
End Select
[此贴子已经被作者于2018/3/1 22:14:15编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2239 积分:18446 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2018/3/1 22:16:00 [显示全部帖子]

Select Case e.DataCol.Name
    Case "JS"
        If e.DataRow("JS") = True Then
            If  e.DataRow.IsNull("JSSJ") = True  Then
                e.DataRow("JSSJ") = Date.Today()
            End If
            e.DataRow.Locked = True
        End If
End Select

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


加好友 发短信
等级:九尾狐 帖子:2239 积分:18446 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2018/3/1 22:26:00 [显示全部帖子]

那代码你不能这么整呀。

前面的数据修改的时候,你要去触发某一列的重置,让这一列的状态发生改变。
"JS"这一列的值发生改变,需要通过其它的代码来改变状态才行
   
Select Case e.DataCol.Name
    Case "JS"
        If e.DataRow("JS") = True Then
            If  e.DataRow.IsNull("JSSJ") = True  Then
                e.DataRow("JSSJ") = Date.Today()
            End If
         End If
       e.DataRow.Locked = e.DataRow("JS")
End Select
[此贴子已经被作者于2018/3/1 22:30:28编辑过]

 回到顶部