主题：qjbzjp老师好，请看......
yin710
[专家分：0] 发布于 2010-02-04 19:57:00
qjbzjp老师好，代码能通过测试，但其他文本框没有反应，不能出现计算好的数字。我上传一个附件，请老师看看，顺便看看其他的：
1、文本框里的在填数字时不很如意，咋样修改
2、想填好框1的数字，其他框里就出现数字，而我的是有个按钮，想去除。
最后更新于：2010-02-04 20:03:00
回复列表 （共4个回复）
沙发
qjbzjp [专家分：8830] 发布于 2010-02-04 21:39:00
我发的代码是输入数据后要敲回车键才能在其它框中有变化。
你的表单上控件不一样，要做相应变动。
把表单“sf”的KeyPress事件中代码删除，在Command1的Click事件中加入代码：
thisform.sf.value=thisform.sr.value-thisform.zc.value
n=thisform.sf.value*IIF(thisform.sf.value>10000.and.thisform.sf.value<30001,0.85,0.8)
thisform.gr.Value=IIF(n>20000,20000,n)
thisform.cz.value=thisform.sf.value*IIF(thisform.sf.value>10000.and.thisform.sf.value<30001,0.15,0.2)
thisform.ye.value=IIF(n>20000,n-thisform.gr.Value,0)
板凳
qjbzjp [专家分：8830] 发布于 2010-02-04 22:10:00
也可以将控件Command1去掉，把我所发附件中给的代码放到你的表单中的ZC中KeyPress中。这样在支出数据输入完成后，敲回车键就会产生结果。
3 楼
yin710 [专家分：0] 发布于 2010-02-04 22:18:00
qjbzjp老师好：在Command1的Click中输入关闭时提示thisform.ye.value=IIF(n>20000,n-thisform.gr.Value,0)为缺乏表达式，点忽略后，能运作，但仍提示和没有余额的反应。又麻烦老师啦
4 楼
yin710 [专家分：0] 发布于 2010-02-04 22:30:00
老师好，你说的第二个能用，真高兴，再次感谢你，为什么第一个缺乏表达式呢？
我来回复
您所在位置：