Foxtable(狐表)用户栏目专家坐堂 → [求助]请问此功能怎么实现?


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

主题:[求助]请问此功能怎么实现?

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


加好友 发短信
等级:幼狐 帖子:65 积分:554 威望:0 精华:0 注册:2019/12/13 9:17:00
[求助]请问此功能怎么实现?  发帖心情 Post By:2020/7/31 10:37:00 [只看该作者]

 图片点击可在新窗口打开查看

图片点击可在新窗口打开查看

现在已经完成的功能是 开piao已勾选 已开piao金额显示;开piao未勾选 未开piao金额显示

贴上代码:
If e.DataCol.Name = "是否开piao" Then '如果是已结帐列的内容变动
    If e.NewValue = True Then '而且变动后的值是True(已勾选)
        e.DataRow("已开piao金额") = e.DataRow("加工费") '那么锁定此行
        e.DataRow("未开piao金额") =0 '那么锁定此行
    Else If e.NewValue = False Then '而且变动后的值是True(已勾选)
        e.DataRow("未开piao金额") =e.DataRow("加工费") '那么锁定此行
        e.DataRow("已开piao金额") = 0
       
    End If
End If

请问想实现手动输入金额后 “是否开piao”栏 自动勾选 比如输入 已开piao金额后,未开piao金额填写 0 后,会自动打钩



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


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/31 10:46:00 [只看该作者]

Select Case e.DataCol.Name
    Case "是否开piao" Then '如果是已结帐列的内容变动
        systemready = False
        If e.NewValue = True Then '而且变动后的值是True(已勾选)
            e.DataRow("已开piao金额") = e.DataRow("加工费") '那么锁定此行
            e.DataRow("未开piao金额") =0 '那么锁定此行
        Else If e.NewValue = False Then '而且变动后的值是True(已勾选)
            e.DataRow("未开piao金额") =e.DataRow("加工费") '那么锁定此行
            e.DataRow("已开piao金额") = 0
        End If
        systemready = True
    Case "已开piao金额"
        If e.NewValue > 0 Then
            systemready = False
            e.DataRow("是否开piao") = True
            e.DataRow("未开piao金额") =0
            systemready = True
        End If
    Case "已未开piao金额"
        If e.NewValue > 0 Then
            systemready = False
            e.DataRow("是否开piao") = False
            e.DataRow("已开piao金额") = 0
            systemready = True
        End If
End Select
[此贴子已经被作者于2020/7/31 10:46:47编辑过]

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


加好友 发短信
等级:幼狐 帖子:65 积分:554 威望:0 精华:0 注册:2019/12/13 9:17:00
  发帖心情 Post By:2020/7/31 11:02:00 [只看该作者]

 谢谢老师

 回到顶部