Foxtable(狐表)用户栏目专家坐堂 → 请教一个循环计算的问题


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

主题:请教一个循环计算的问题

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


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
请教一个循环计算的问题  发帖心情 Post By:2014/4/7 14:01:00 [只看该作者]

已知收入,如果输入 支出,可以计算出余额;如果输入余额,也可以计算出支出。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:收支计算.foxdb


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140407135639.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/7 14:14:00 [只看该作者]

 是单行计算,还是流水账?

 

http://www.foxtable.com/help/topics/1572.htm

 


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


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2014/4/7 14:16:00 [只看该作者]

是单行计算,请问代码该如何写呢?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/7 14:34:00 [只看该作者]

 做了一下,是矛盾,只能这样处理一下了。编写datacolchanged事件

 

SystemReady = False
Select Case e.DataCol.Name
    Case "收入","支出", "余额"
        If e.NewValue <> Nothing  Then
            If e.DataRow.IsNull("收入") = False AndAlso e.DataRow.IsNull("支出") = False Then
                If e.DataRow.IsNull("余额") Then
                    e.DataRow("余额") = e.DataRow("收入") - e.DataRow("支出")
                End If
            Else If e.DataRow.IsNull("收入") = False AndAlso e.DataRow.IsNull("余额") = False Then
                If e.DataRow.IsNull("支出") Then
                    e.DataRow("支出") = e.DataRow("收入") - e.DataRow("余额")
                End If
            Else If e.DataRow.IsNull("支出") = False AndAlso e.DataRow.IsNull("余额") = False Then
                If e.DataRow.IsNull("收入") Then
                    e.DataRow("收入") = e.DataRow("支出") + e.DataRow("余额")
                End If
            End If
        End If
End Select
SystemReady = True


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


加好友 发短信
等级:狐精 帖子:3358 积分:24758 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2014/4/7 15:38:00 [只看该作者]

甜老师 SystemReady 这个是 用来做控制什么的 我有个问题 如果一个表有datacolchanged事件 A=B+C 当这行数据是从别的表直接赋值过来 列也是一样 但是A=B-C  这个时候A的结果以哪个为准?

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/7 15:53:00 [只看该作者]

以下是引用rjh4078在2014-4-7 15:38:00的发言:

甜老师 SystemReady 这个是 用来做控制什么的 我有个问题 如果一个表有datacolchanged事件 A=B+C 当这行数据是从别的表直接赋值过来 列也是一样 但是A=B-C  这个时候A的结果以哪个为准?

 

 

这个问题需要有一个准则,不然就是死循环,或者计算不灵活

 

http://www.foxtable.com/help/topics/2218.htm

 


 回到顶部