Foxtable(狐表)用户栏目专家坐堂 → 除了使用表达式,计算外,还有其他方法实现计算没?谢谢


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

主题:除了使用表达式,计算外,还有其他方法实现计算没?谢谢

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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
除了使用表达式,计算外,还有其他方法实现计算没?谢谢  发帖心情 Post By:2009/8/17 22:24:00 [只看该作者]

除了使用表达式,计算外,还有其他方法实现计算没?谢谢

 回到顶部
美女呀,离线,留言给我吧!
yangming
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/8/17 22:46:00 [只看该作者]

可以使用事件代码计算啊,你是什么意思?


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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
  发帖心情 Post By:2009/8/17 22:56:00 [只看该作者]


1、如何将“审核”表中的<审核>列的数据,自动转入到“调资基础数据”表中<审核结果>列的相应行内?谢谢
2、“人事工资管理”表的合计我是通过表达式实现的,保存不到外挂数据库中,如何通过其他方法实现保存到外挂数据库中?谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:rsgzglxt.rar

[此贴子已经被作者于2009-8-17 23:01:06编辑过]

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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
  发帖心情 Post By:2009/8/18 9:29:00 [只看该作者]

还有就是如何切换表!!!

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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
  发帖心情 Post By:2009/8/18 10:44:00 [只看该作者]

版主帮忙看看,谢谢
SOS

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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
  发帖心情 Post By:2009/8/18 11:01:00 [只看该作者]

Maintable = Tables("订单")
表切换可以使用这个不?谢谢

 回到顶部
美女呀,离线,留言给我吧!
yangming
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/8/18 11:04:00 [只看该作者]

以下是引用杨浩在2009-8-18 11:01:00的发言:
Maintable = Tables("订单")
表切换可以使用这个不?谢谢

可以


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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33951 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2009/8/18 11:08:00 [只看该作者]

1、将两表的序号列列类型改成一致,如字符型。
审核表DataColChanged事件代码:

if e.DataCol.Name = "审核" Then
    Dim dr As DataRow = DataTables("调资基础数据").Find("[序号] = '" & e.DataRow("序号") & "'")
    If dr IsNot Nothing Then
        Dim i As Integer = Tables("调资基础数据").FindRow(dr)
        If i >= 0 Then
            Tables("调资基础数据").Rows(i)("审核结果") = e.DataRow("审核")
        End If
    End If
End If

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33951 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2009/8/18 11:14:00 [只看该作者]

2、在外部表增加合计列,删除原有的表达式合计列。
人事工资管理表DataColChanged事件代码:

Select Case e.Datacol.Name
    Case  "基础工资","级别工资","职务工资"
        e.DataRow("合计") = e.DataRow("基础工资")+e.DataRow("级别工资")+e.DataRow("职务工资")
End Select

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


加好友 发短信
等级:一尾狐 帖子:483 积分:2913 威望:0 精华:0 注册:2008/9/21 16:18:00
  发帖心情 Post By:2009/8/18 11:35:00 [只看该作者]

1、审核表审核信息没有自动转到调资基础数据表的审核结果内?
2、在人事工资表中选择副科级工资不变?
谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:rsgzglxt.rar

[此贴子已经被作者于2009-8-18 11:35:09编辑过]

 回到顶部
总数 11 1 2 下一页