Foxtable(狐表)用户栏目专家坐堂 → 流水帐问题


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

主题:流水帐问题

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
流水帐问题  发帖心情 Post By:2012/10/8 15:31:00 [只看该作者]

   我仿样式列子做了流水帐,代码没变,并加了样式,同时我用同样的代码做了另一个银行流水帐,可是发现另一个不能用,功能不能实现,余额不能变化,样式不能生成。请问是什么原因?是不是定义的变量冲突?不同的表变量可以用一个么?

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/8 15:44:00 [只看该作者]

 把例子发上来看看。

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
跟学习实例一样的呀  发帖心情 Post By:2012/10/8 15:48:00 [只看该作者]

 

农行明细表_DataColChanged

 

Select Case e.DataCol.Name

    Case "收入","支出"

        For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey"))

            Dim Val1 As Double = e.DataTable.Compute("Sum(收入)","[_SortKey] <= " & dr("_SortKey"))

            Dim Val2 As Double = e.DataTable.Compute("Sum(支出)","[_SortKey] <= " & dr("_SortKey"))

            dr("余额") = Val1 - Val2

        Next

End Select

 

农行明细表_DataRowDeleting

 

e.DataRow("收入") = 0

e.DataRow("支出") = 0

 

农行明细表_AfterMoveRow

 

Dim Key As Decimal

Dim Index As Integer

Dim dc As DataCol

Index = Math.Min(e.OldIndex, e.NewIndex)

Key = e.Table.Rows(Index)("_SortKey")

dc = e.Table.DataTable.DataCols("收入")

dc.RaiseDataColChanged("[_SortKey] >= " & Key)

 

农行明细表_DrawCell

 

If e.Col.name="收入" Then

e.Style="收入样式"

End If

另外一个表是一样的代码。


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57634 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/10/8 15:54:00 [只看该作者]

重置列一下

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/8 15:56:00 [只看该作者]

 代码看不出对错,做好有例子。

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
  发帖心情 Post By:2012/10/8 16:01:00 [只看该作者]

同一个项目里有两个同样结构的表,同样的代码,只是表名不一样,一个可以,另一个不行。不知哪里出错,重置例了也不行。


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


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/10/8 16:21:00 [只看该作者]

做个不行的例子发上来

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
  发帖心情 Post By:2012/10/8 16:25:00 [只看该作者]

在我的项目里,我只复制了代码上来,结构与帮助文件的例了一样。

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
  发帖心情 Post By:2012/10/8 16:28:00 [只看该作者]

我想确定一样,同一个项目里做同样结构的表,同样的代码,有两个表,变量这些会不会冲突,我反复核实跟帮助文件的例子一样。结构一样,代码一样。

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


加好友 发短信
等级:二尾狐 帖子:528 积分:5034 威望:0 精华:0 注册:2012/4/6 19:31:00
  发帖心情 Post By:2012/10/10 16:45:00 [只看该作者]

已解决,我也不知为啥,买了开发版可以的。

 回到顶部