共8 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[求助]求助。。设计项目时遇到瓶颈
1楼
kevin11 发表于：2011/9/21 11:47:00请教各位专家：
附件中表A是手工输入的合同编号及合同金额，表B是对应合同的付款明细。
我想设置一个代码，在输入表B的付款金额列的数值时，自动判断该合同的累计付款金额是否已超过合同金额，如果超过则限制输入并弹出警告窗口。
我已经研究好几天都没结果。。实在着急，请各位帮帮忙，万分感谢！！
2楼
kevin11 发表于：2011/9/21 11:48:00补充附件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
3楼
程兴刚 发表于：2011/9/21 12:03:00这是很简单的问题，采用关联表即可实现！
4楼
kevin11 发表于：2011/9/21 12:08:00请问能不能具体一点呢，我刚刚入门没多久，感谢了，如果可能能不能在将我的附件编辑后发给我学习一下，谢谢了！！
5楼
狐狸爸爸 发表于：2011/9/21 12:22:006楼
kevin11 发表于：2011/9/21 12:51:00请教狐爸爸，我想实现判断累计付款超过合同金额后取消录入的值，在datacolchanged代码中加了一个e.Cancel = True，具体如下，为何弹出对话框点确定后，输入的值依然存在？
Select Case e.DataCol.name
Case "付款金额"
Dim pr As DataRow = e.DataRow.GetParentRow("表A")
If pr("付款金额") > pr("合同金额") Then
messagebox.show("付款金额超过合同金额")
e.Cancel = True
End If
End Select
7楼
狐狸爸爸 发表于：2011/9/21 13:56:008楼
kevin11 发表于：2011/9/21 14:21:00太感谢了。。伟大的狐爸爸~~~狐表很强大，值得深入学习。。。。
共8 条记录, 每页显示 10 条, 页签:
[1]