运行表单“2018年秋学期课表调整”出错，（我想用表单中输入的内容替换掉kb20180920.dbf中字段内容，如年级：一年级  班级：（1）班 学科：队会 节次：zhou15），现将click事件代码贴出，恳请高手帮忙，万分感谢！



click事件代码：
SET TALK OFF
SET SAFETY OFF
SET COMPATIBLE OFF

cCurrentProcedure = SYS(16,1)
nPathStart = AT(":",cCurrentProcedure)- 1
nLenOfPath = RAT("\", cCurrentProcedure) - (nPathStart)
mypath=SUBSTR(cCurrentProcedure, nPathStart, nLenofPath)
SET Default TO (mypath)


PUBLIC cnj,cbj,cxk,cjc
cnj=ALLTRIM(thisform.text1.Value)
cbj=ALLTRIM(thisform.text2.Value)
cxk=ALLTRIM(thisform.text3.Value)
cjc=ALLTRIM(thisform.text4.Value)
use kb20180920
REPLACE cjc with cxk for nj=cnj .and. bj=cbj
browse

如何修改代码，还请不吝赐教。

一周五天，每天六节课，zhou35表示周三第5节课.因为我是新手，还请各位高手帮忙写点代码，以解决问题，万分感谢！！！

我想用表单中输入的内容替换掉kb20180920中一年级（1）班zhou15字段内容为队会（原为班会），请高手帮忙。万分感谢！！！

小学

请@sdta版主提供下代码好吗？万分感谢！！！

@sdta非常感谢你提供的代码，值得学习借鉴。但在运行中会有一点小问题，能帮忙修改一下吗？

表单运行后的错误页面已贴出，请@sdta帮忙修改一下代码，万分感谢！！！

明白了，我用的是vfp7.0