求高手帮忙将易表里的计算公式转到FOXTABLE里。多谢！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求高手帮忙将易表里的计算公式转到FOXTABLE里。多谢！

共有30606人关注过本帖树形打印复制链接主题：求高手帮忙将易表里的计算公式转到FOXTABLE里。多谢！

maggie09

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

求高手帮忙将易表里的计算公式转到FOXTABLE里。多谢！ 发帖心情

Post By：2009/6/23 18:21:00 [显示全部帖子]

我以前一直通过易表计算产品的成本，我们是冲压件，在算成本的时候公式里有开根号，易表公式生成器里就有这个函数。
现在我要改用FOXTABLE，可是却不知道怎样设置成本计算公式。
比如，我原先在易表里面的拉伸壳成本公式是：
Sqrt(Sqr([外径]) + 4 * [外径] * [高度]) * Sqrt(Sqr([外径]) + 4 * [外径] * [高度]) * [拉伸壳_厚度] * 0.78 / 100 * [拉伸壳_单价] / 1000000 * 1.1

请高手赐教，在FOXTABLE里要如何设置？我将易表和FOXTABLE的文件都上传了，麻烦帮忙将表里的各个成本项设置一下，感激不尽！

下载信息 [文件大小：下载次数： ]
点击浏览该文件:ff.rar

[此贴子已经被作者于2009-6-23 18:25:40编辑过]

maggie09

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 9:03:00 [显示全部帖子]

不好意思，你只帮我改了一列，其它的我不知道要在哪里改？也就是怎么将表达式改成数据列，在哪里输入计算公式？请赐教！

maggie09

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 10:00:00 [显示全部帖子]

哎。不好意思。我对编程不懂的...虽然易表用了好多年，但是都是一些最基本的应用。我知道FOXTABLE功能很强大，但是感觉束手无策。。。帮助文件里的开发部分对懂编程的人来说可能驾轻就熟，对从零开始的我，就难了。。。

我接下来的问题是：

如果我要设置下一个计算公式：前面两句仍然如下吗？

Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name

还是要做相应的修改？怎么改？

maggie09

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 10:01:00 [显示全部帖子]

版主，被你说中啦！

[此贴子已经被作者于2009-6-26 10:06:14编辑过]

maggie09

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 10:31:00 [显示全部帖子]

又被楼主说中了！我这次的这个核算成本任务很紧急！如果版主能帮我先都设置好，解燃眉之急，不甚感激！

maggie09

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 11:47:00 [显示全部帖子]

以下是引用yangming在2009-6-26 11:44:00的发言：
你表中的有些列和易表中并不一致,如何处理?,比如
[滤纸_宽度] * 2 * [滤纸_折数] * [滤纸_高度] * [滤纸_克数] * [滤纸_单价] / 0.9 / 1000000000000
而狐表中并没有高度这一列,

这个高度等于中心管_高度

maggie09

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 11:50:00 [显示全部帖子]

我自己针对螺纹板的成本设置了一下，就是将鼠标移到螺纹板成本这一列，打开表属性里面的事件，将公式输入如下：

Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "外径","螺纹板_厚度","螺纹板_单价"
dr("螺纹板_成本") = ("外径"-1.5)*("外径"-1.5)*"螺纹板_厚度"*0.78*100*"螺纹板_单价"/1000/1000*1.1
End Select

可是，这样一来，原先设置好的拉伸壳_成本的公式也变成这个了，这个是怎么一回事啊？

我看了一下，每一列的事件都是这个变成这个了。

[此贴子已经被作者于2009-6-26 11:51:04编辑过]

maggie09

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 14:31:00 [显示全部帖子]

非常感谢！

但是现在发现有个问题，当我想用Delete 键删除现有的数据的时候，跳出一个画面：

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

此主题相关图片如下：555.jpg

这是怎么回事？我直接按确定掉，可以吗

maggie09

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 14:54:00 [显示全部帖子]

又跳出个窗口：

我把中心管_成本公式改成如下：

Case "中心管_直径","中心管_高度","中心管_单价","中心管_厚度"
dr("中心管_成本") = dr("中心管_直径")* 3.14 * "中心管_厚度" * 0.785 / 100 * dr("中心管_单价")/ 1000000 * dr("中心管_高度") / 0.8

就是把3.14后的0.4替换成中心管_厚度，然后当我在狐表里输入中心管厚度的时候，却跳出下面窗口：

此主题相关图片如下：666.jpg

麻烦版主帮忙看一下哦！

maggie09

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：255 威望：0 精华：0 注册：2009/6/23 17:37:00

Post By：2009/6/26 15:18:00 [显示全部帖子]

以下是引用狐狸爸爸在2009-6-26 15:03:00的发言：
错误：
dr("中心管_成本") = dr("中心管_直径")* 3.14 * "中心管_厚度" * 0.785 / 100 * dr("中心管_单价")/ 1000000 * dr("中心管_高度") / 0.8

正确：
dr("中心管_成本") = dr("中心管_直径")* 3.14 * dr("中心管_厚度") * 0.785 / 100 * dr("中心管_单价")/ 1000000 * dr("中心管_高度") / 0.8

是的。经过研究我发现问题所在了。谢谢！

下一主题 >> << 上一主题

总数 20 1 2 下一页

主题：求高手帮忙将易表里的计算公式转到FOXTABLE里。多谢！