以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=14323)

--  作者:bm
--  发布时间:2011/11/15 23:28:00
--  代码求助

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

谢谢各位高手了。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:狐狸爸爸
--  发布时间:2011/11/15 23:34:00
--  

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:bm
--  发布时间:2011/11/15 23:40:00
--  狐狸爸爸请您再看看

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


--  作者:狐狸爸爸
--  发布时间:2011/11/15 23:47:00
--  
呵呵,关键的部分已经给你写好了,自己根据需要完善吧。
--  作者:bm
--  发布时间: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
按此在新窗口浏览图片

--  作者:狐狸爸爸
--  发布时间:2011/11/16 10:31:00
--  

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


--  作者:bm
--  发布时间:2011/11/16 10:34:00
--  麻烦狐狸爸爸了
麻烦狐狸爸爸了
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1(1).table


--  作者:狐狸爸爸
--  发布时间:2011/11/16 11:00:00
--  

单击按钮才提示:

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目58.rar