在TEXT中输入内容，按修改按钮
表中全部记录的字段1全部修改成TEXT的值
如：在TEXT中输入：123456
表中有10条记录，表中的10条记录的字段1的内容全部改成123456

TEXT1.LOSTFOCUS EVENTS

REPLACE ALL 字段1 WITH ALLTRIM(THIS.VALUE)

在 文本框的Init事件中：
this.Value =0

在文本框的keypress事件中：
IF nKeyCode=13
    REPLACE all 字段名 with this.value
ENDIF

文本框的lostfocus事件中：
repla all 字段1 with allt(thisform.text1.value)

如果字段1是字符型：ALLTRIM(THIS.VALUE)　&&防止输入内容不是在TEXT1中的起始处输入
如果字段1是数值型：THIS.VALUE


[ 本帖最后由 sdta 于 2013-1-17 20:39 编辑 ]

看来楼主是一页教材都不用翻了。

3楼的代码，在文本框输入完毕敲回车键时发生置换；2、4楼的代码，文本框失去焦点发生。同时使用两种代码为好。

对的

在TEXT的lostfocus事件中添加如下代码
 REPLACE 字段1 WITH ALLTRIM(ThisForm.text1.value) ALL

楼上各位可能没看清楚
他是有修改按钮的