Thisform.LockScreen=.t.
Thisform.grid1.RecordSource=""

use e:\lzsto\data\lrb.dbf
dele all for 单号<99999999999
pack
  use e:\lzsto\data\lzsto.dbf
  append from e:\lzsto\data\lrb.dbf
  use e:\lzsto\data\lrb.dbf
  zap
messagebox("上传成功，点击退出！")
append blank
repl 日期 with date(),付款否 with .t.


Thisform.grid1.RecordSource="lrb.dbf"
Thisform.LockScreen=.F.
thisform.grid1.refresh()

新手，做一个数据输入上传表单，把当前表追加到另一表时，表格控件只有表头，内容不能看到了，帮忙看下哪里问题？

在表单文本框中输入lrb.dbf的相应字段，结果在grid1表格中同步显示，点击“上传数据”按钮从lrb.dbf中删除字段名为 单号<99999999999的记录，然后追加到lzsto.dbf表中，返回当前表单继续录入。点击上传后其他功能正常，只是grid1表格不显示数据了，只有表头。