当前位置: 代码迷 >> VFP >> 文本控件不能刷新解决办法
  详细解决方案

文本控件不能刷新解决办法

热度:7309   发布时间:2013-02-26 00:00:00.0
文本控件不能刷新
在表单中的文本控件的值能随复选框控件的值改动而刷新吗?在同一个表单里。

------解决方案--------------------------------------------------------
可以,在复选框控件的 InteractiveChange 和 ProgrammaticChange 事件中写代码改变 textbox 的 Value 属性即可
------解决方案--------------------------------------------------------

SQL code
InteractiveChange:在使用键盘或鼠标更改控制的值时,此事件发生。
------解决方案--------------------------------------------------------
程序有些乱......
SQL code
n1="0000"ren=SUBSTR(ALLTRIM(str(YEAR(DATE()))),3,2)+PADL(ALLTRIM(STR(MONTH(DATE()))),2,"0")+n1///取得一个值 假如 是 2012050000 字符型SELECT c    //转到表LOCATE FOR 编号=ren // 搜寻是否有编号IF .not.eof()   && 找到了   建议使用  found()thisform.text3.Value=ren   //文本 的值 现在是 "2012050000"thisform.text3.refresh     // 刷新....else        //没有找到ren=val(ren)+1  // ren的值 现在是 2012050001  数字型  这样会提示 类型错误的吧RETURN          // 直接返回了,  不需要更新 thisform.text3.Value 吗ENDIF
  相关解决方案