表单中TEXTBOX修改一个DBF表数据不能绑定,请教高手！急！

[playfox]

用编程的方法，我不知道为什么通过表单的TEXTBOX修改一个DBF表，TEXTBOX和DBF表之间数据不能绑定，即修改了数据无法反映到DBF中

[mudong]

运行时可以修改textbox的属性、我想可以在代码的适当地方绑定数据。不过没有向你那样用过、不能肯定地说。

[playfox]

那位高手替我解决，
源程序代码：

close all
clear all
set deleted on
set exac on
set talk off
set dohistory off
set safe off
set stat bar off
set date to YMD
SET CENTURY ON
frmsjlr = CREATEOBJECT("sjlrForm") &&FORM参数设置
frmsjlr.buffermode=2
frmsjlr.visible=.t.
frmsjlr.caption='T112表'
frmsjlr.HEIGHT=454
frmsjlr.width=633
use t112
go top
frmsjlr.addobject("LABEL1","LABEL")
frmsjlr.LABEL1.visible=.t.
frmsjlr.LABEL1.caption='代码 '
frmsjlr.LABEL1.top=6
frmsjlr.LABEL1.left=10
frmsjlr.LABEL1.width=7*12
frmsjlr.addobject("TEXTBOX1","TEXTBOX")
frmsjlr.TEXTBOX1.visible=.t.
frmsjlr.TEXTBOX1.top=3
frmsjlr.TEXTBOX1.left=95
frmsjlr.TEXTBOX1.width=9*7
frmsjlr.TEXTBOX1.value=t112.frdm
frmsjlr.TEXTBOX1.controlsource=t112.frdm
frmsjlr.Show
READ EVENTS

return
DEFINE CLASS sjlrform AS form
PROCEDURE Destroy
CLEAR EVENTS
ENDPROC
ENDDEFINE

用编程的方法，我不知道为什么通过表单的TEXTBOX修改一个DBF表，TEXTBOX和DBF表之间数据不能绑定，即修改了数据无法反映到DBF中

[mudong]

frmsjlr.TEXTBOX1.controlsource=t112.frdm 应该为
frmsjlr.TEXTBOX1.controlsource="t112.frdm"

另外后面指定数据源、前面一句frmsjlr.TEXTBOX1.value=t112.frdm可以不要了。

[playfox]

mudong(木东) :

thank you!