select lsb
use
use lsb exclusive
dele all for empty(编号)
pack
set delete off
use
use lsb
select lsb
with thisform.grid1
.columncount=2
.column1.controlsource="编号"
.column2.controlsource="名称"
endwith
请帮帮忙看看，这代码有什么问题，为什么执行了之后表格中没有记录显示

select lsb
use
use lsb exclusive
dele all for empty(编号)
pack
set delete off
use
use lsb
select lsb
with thisform.grid1
.columncount=2
.column1.controlsource="编号"
.column2.controlsource="名称"
endwith
请帮帮忙看看，这代码有什么问题，为什么执行了之后表格中没有记录显示
表中有记录是不符合条件删除的

先将数据表[LSB]加入表单的数据环境中，然后在表格控件的INIT事件中写入以下代码：

WITH THISFORM.GRID1
     .COLUMNCOUNT=2
     .RECORDSOURCE=[LSB]
     .RECORDSOURCETYPE=1
ENDWITH

传上表单看看

thisform.refresh

sdta,你的代码还是不行，我不知道我为什么上传不了图片，表单我没法传

刷新表单的方法早就用过了

这段代码有啥问题呢，我研究了一下，问题主要有两方面：1、如sdta版主所说，表文件没有设置为打开。解决方法：RecordSourceType属性设为0—表，RecordSource属性设为表文件名。顺便说一下RecordSourceType属性设为0和1的区别：“0—表”在表单执行时可以自动打开表文件；而“1—别名”不会自动打开，需要在表单的Load或Init事件中用USE命令手动打开。2、你代码中关于列序的方面有错误，倒数第三、二行应该写为：.column(1).controlsource="编号"、.column(2).controlsource="名称"。
按这个修改完以后，你再运行表单试试。有问题再问。

select lsb
thisform.grid1.recordsource="lsb"
thisform.grid1.recordsourcetype=1
thisform.refresh

试试：

SELECT lsb
USE lsb exclusive
DELETE all for empty(编号)
WITH thisform.grid1
    .RecordSource=null
    pack
    set delete off
    .RecordSource="lsb"
    .columncount=2
    .column1.controlsource="编号"
    .column2.controlsource="名称"
ENDWITH
thisform.refresh


[ 本帖最后由 qjbzjp 于 2012-12-24 09:20 编辑 ]