Foxtable(狐表)用户栏目专家坐堂 → 帮助里的事件举例请教


  共有2660人关注过本帖平板打印复制链接

主题:帮助里的事件举例请教

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


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
帮助里的事件举例请教  发帖心情 Post By:2014/5/27 9:21:00 [只看该作者]

大师:您好!

请问以下代码写在哪个表的DataColChanged事件里?,订单表的DataColChanged好像也需写代码?


再例如希望在产品表中修改单价后,对于已经锁定或者已经付款的订单,单价保持不变,其余订单则采用新的单价:

If e.DataCol.Name = "单价"
    Dim
Filter As String = "[品名] = '" & e.DataRow("品名") & "' And 已付款 = False"
    Dim
drs As List(Of DataRow) = DataTables("订单").Select(Filter)
    For Each
dr As DataRow In drs
        If dr.Locked = False Then   

            DataTables(
"订单").DataCols("品名").RaiseDataColChanged(dr)
        End If       

    Next
End If


 回到顶部