首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

灵异了,为什么这样GRID就不更新数据,百思不得其解解决思路

2012-03-21 
灵异了,为什么这样GRID就不更新数据,百思不得其解我的表单中有其中一个GRID名为GridCl,用两个按钮控制,分

灵异了,为什么这样GRID就不更新数据,百思不得其解
我的表单中有其中一个GRID名为GridCl,用两个按钮控制,分别是“解锁”和“锁定”
解锁中代码如下
With .GridCl
.Readonly = .F.&&可写
.Enabled = .T.&&可改
* 修改显示
.Column4.Header1.Caption = "三矿上报"
.Column4.Text1.Value = .Column4.Text1.Value + xu21 + zhao8
EndWith
锁定中代码如下
With .GridCl
.Readonly = .T.&&锁定
.Enabled = .F.&&保护
* 修改显示
.Column4.Header1.Caption = "三矿产量"
.Column4.Text1.Value = .Column4.Text1.Value - xu21 - zhao8
* 数据处理
Select kkcsb&&启用表
If rq <> date()
replace all rq with date()
EndIf
EndWith

我目的是将GridCl的第四列在按“解锁”后显示“三矿上报”,并且Text1中显示的事计算好的值
再次按锁定时,将提示改为“三矿产量”并还原计算值
若是不增加“Select kkcsb”语句则一切正常,若是添加此语句,则在日期更换时打开软件点击解锁第一次可以正常修改加法运算后的值,锁定也正常,而再次点击“解锁”时则不会进行加法运算了,仍然显示运算前的值

尽管这个临时累加的值不影响正常使用,因为解锁后还是需要修改这个累加值的所以也没什么用,但是这个小BUG我一直不知道怎么解决

至少现在知道一点就是问题出在“Select kkcsb”这句,只是完全不知道为何会这样
若是将此语句移到修改列标题语句前,则效果是锁定按钮不进行减法运算了

完全搞不懂这是为什么,请各位指点

[解决办法]
.Column4.Text1.Value = .Column4.Text1.Value + xu21 + zhao8
改为直接更改表中字段中的值

另外应该是
replace all rq with date()
这句改变了记录号的原因吧。

热点排行