注册 登录
编程论坛 VFP论坛

COMBO 值更新 TEXT 不更新 奇怪

ljlhpop 发布于 2022-03-29 19:29, 1477 次点击
各位大师好!
原则是上选择COMBO1下拉,后面跑出工号,如果下拉没有没有数据,那就在COMBO1上手工输入姓名,后面输入工号,按确定后添加到SWZ 表,不过问题来了,现在手工输入姓名,后面的工号是保留别人的工号(表里面最后一条别人的工号),,,如何清空掉呢?
另外,,这个下拉显示对应的工号,要用哪个方法好? VALID ? INTERACTIVECHANGE? GETFOCUS?

请大师赐教。。谢谢!
只有本站会员才能查看附件,请 登录
只有本站会员才能查看附件,请 登录
9 回复
#2
ljlhpop2022-03-29 19:34
SELECT swz
LOCATE FOR swz.swz=
    IF !FOUND()
        APPEND BLANK
        replace swz.swz WITH
        replace swz.工号 WITH thisform.text6.Value
    ENDIF

thisform.Refresh

这个确定里面的代码
#3
sdta2022-03-29 19:35
找不到gzrs.dbf
#4
ljlhpop2022-03-29 19:40
回复 3楼 sdta
只有本站会员才能查看附件,请 登录


非常抱歉,,没测试好就发过去了。。。
这个GZRS其实没啥用
#5
ljlhpop2022-03-29 19:43
回复 3楼 sdta
只有本站会员才能查看附件,请 登录

尴尬,,,刚才测试还要这个GZRS1 ,,我全部重新上传,,非常不好意思
#6
ljlhpop2022-03-29 20:42
SELECT SWZ
LOCATE FOR ALLTRIM(swz.swz)==ALLTRIM()
IF FOUND()
    thisform.TEXT6.Value=swz.工号

ENDIF

combo1 的 INTERACTIVECHANGE 修改一下就OK 了... 感觉可以,,,,不过还是搞不懂,,什么时候用VALID ? 什么时候用interactivechange ?  什么时候用getfocus ?
#7
sdta2022-03-29 21:08
以下是引用ljlhpop在2022-3-29 20:42:38的发言:

SELECT SWZ
LOCATE FOR ALLTRIM(swz.swz)==ALLTRIM()
IF FOUND()
    thisform.TEXT6.Value=swz.工号

ENDIF

combo1 的 INTERACTIVECHANGE 修改一下就OK 了... 感觉可以,,,,不过还是搞不懂,,什么时候用VALID ? 什么时候用interactivechange ?  什么时候用getfocus ?

看帮助文件
#8
ljlhpop2022-03-30 17:39
回复 7楼 sdta
先谢谢了。。。帮组文件就是看晕了。。。新手理解能力不行
#9
jhcwk2022-03-31 19:27
VALID : 在控件失去焦点之前发生;interactivechange : 更改控件的值时发生;getfocus :对象得到焦点时发生。
#10
ljlhpop2022-04-17 14:48
回复 9楼 jhcwk
主要是不知道啥时候应用到。。。
1