[求助]刚刚入门，请甜老师指教一下这个代码应该怎么写？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：tim截图20181127103905.png

我想实现的功能是计算结余

条件是这样的：
1、筛选出“材料种类”是“燃油”的内容；
2、先按“日期”排序，再按“编号”排序；
3、结余初始为“0”；
4、如是“收发”列为“收”则加，是“发”则减去；
5、显示结果在“结余”金额列。

我在DataColChanged事件中写了如下代码：

If e.DataCol.Name = "结余_金额" Then
Dim jyje As Double = "0"
If e.DataRow("材料种类") = "燃油" Then
e.DataRow.Sort = "日期,编号"
If e.DataRow("收发") = 收 Then
jyje = jyje +

因为刚刚接触，实在能力有限，希望老师赐教。

[此贴子已经被作者于2018/11/27 10:49:13编辑过]

主题：[求助]刚刚入门，请甜老师指教一下这个代码应该怎么写？