- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 结帐后不能修改数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169953)
-- 发布时间：2021/7/7 12:27:00
-- 结帐后不能修改数据
做了个结帐表，现在想：已在结帐表标注“已结帐”行所属月份就不能修改
我在PREPAREEDIT表事件列了下列代码，但不见到效果，该人怎样修改呢？
Dim dr = e.Row("月份")
Dim fdr As DataRow = DataTables("结帐").find("月份=\'" & dr & "\'")
If fdr("结帐") = "已结帐" Then
MessageBox.Show("当前月份已结帐,不能修改!", "提示", MessageBoxButtons.Ok, MessageBoxIcon.Information)
Return
End If
-- 发布时间：2021/7/7 13:33:00
--
是月份列不能修改？还是整行不能修改？
prepareedit事件
if e.row("结帐") = "已结帐" then
e.cancel=true
end if
-- 发布时间：2021/7/8 8:44:00
--
我的意思是：我专门做了一个结帐表，只要在结帐表里结帐列注明“已结帐”，哪么其他表相关日期范围内的数据行就不可以修改删除
此主题相关图片如下：qq截图20210708084328.png
-- 发布时间：2021/7/8 9:17:00
--
Dim fdr As DataRow = DataTables("结帐").find("月份=\'" & e.Row("月份") & "\'")
e.cancel = (fdr isnot nothing andalso fdr("结帐") = "已结帐")