代码求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码求助

共有10270人关注过本帖树形打印复制链接主题：代码求助

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

加好友

发短信

等级：一尾狐帖子：437 积分：3463 威望：0 精华：0 注册：2011/9/13 23:27:00

代码求助

Post By：2011/11/15 23:28:00 [只看该作者]

当子表金额的和大于父表运费时给个警告。并显示值（支出项目包含运费的行，不包括杂费）

谢谢各位高手了。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/11/15 23:34:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

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

加好友

发短信

等级：一尾狐帖子：437 积分：3463 威望：0 精华：0 注册：2011/9/13 23:27:00

狐狸爸爸请您再看看 发帖心情

Post By：2011/11/15 23:40:00 [只看该作者]

当子表金额的和大于父表运费时给个警告。并显示值（支出项目包含运费的行，不包括杂费）

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/11/15 23:47:00 [只看该作者]

呵呵，关键的部分已经给你写好了，自己根据需要完善吧。

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

加好友

发短信

等级：一尾狐帖子：437 积分：3463 威望：0 精华：0 注册：2011/9/13 23:27:00

还是要麻烦各位。 发帖心情

Post By：2011/11/16 10:21:00 [只看该作者]

Select Case e.DataCol.name
    Case "金额"
        Dim pr As DataRow = e.DataRow.GetParentRow("表A")
        If pr IsNot Nothing AndAlso pr("aaa") > pr("运费") Then
            messagebox.show("超过了")
        End If
End Select

这个代码如果用在窗口控件（不是绑定的）输入的时候应该怎么改。

TextChanged事件或者Validating事件

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

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/11/16 10:31:00 [只看该作者]

将你做好窗口的表传上来。

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

加好友

发短信

等级：一尾狐帖子：437 积分：3463 威望：0 精华：0 注册：2011/9/13 23:27:00

麻烦狐狸爸爸了 发帖心情

Post By：2011/11/16 10:34:00 [只看该作者]

麻烦狐狸爸爸了

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1(1).table

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/11/16 11:00:00 [只看该作者]

单击按钮才提示：

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目58.rar

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

主题：代码求助