SELECT ,A.patno,A.checker,,A.doctor,A.bed,B.itemcname,B.Reportvalu,B.Resultstat,B.Refrange,A.checkdate,B.zdy3  INTO TABLE ptemp1 FROM plisb A,Pbgao B  WHERE B.sampleno =A.sampleno ORDER BY cname
*SELECT INTO TABLE ptemp2 FROM plisb A,Pbgao B  WHERE B.sampleno =A.sampleno ORDER BY cname


o2=thisform.grid1
thisform.grid1.RecordSource = 'ptemp1'
o2.column1.controlsource=''
o2.column2.controlsource='cname'
o2.column3.controlsource='patno'
o2.column4.controlsource='checker'
o2.column5.controlsource='cname1'
o2.column6.controlsource='doctor'
o2.column7.controlsource=''
o2.column8.controlsource='bed'
o2.column9.controlsource='itemcname'
o2.column10.controlsource='Reportvalu'
o2.column11.controlsource='Resultstat'
o2.column12.controlsource='Refrange'
o2.column13.controlsource='checkdate'
o2.column14.controlsource='iif (ptemp1.zdy3=null ,.f.,.t.)'

点击一下表格，数据为什么会变成一样的，如何控制

将那个GRID表单和plisb、Pbgao两个表放上来测试看看

表格的宽度变化?
默认,双击表格时,对应的列的宽度会根据字段的长度自动调整的,如果你不想这样,可以把这个功能禁用.自己给每列设置宽度就可以了.

指定了表格的宽度，点击表格，数据还是会变换成同一数据

THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE='ptemp1'
只这样,其他的都不要,设置了这个表表格的数据源,每列都不需要再设置

达不到我的效果，

单独一个表都不会出现上面问题
加上这些语句
o2=thisform.grid1
thisform.grid1.RecordSource = 'ptemp1'
o2.column1.controlsource=''
o2.column2.controlsource='cname'
o2.column3.controlsource='patno'
o2.column4.controlsource='checker'
o2.column5.controlsource='cname1'
o2.column6.controlsource='doctor'
o2.column7.controlsource=''
o2.column8.controlsource='bed'
o2.column9.controlsource='itemcname'
o2.column10.controlsource='Reportvalu'
o2.column11.controlsource='Resultstat'
o2.column12.controlsource='Refrange'
o2.column13.controlsource='checkdate'
o2.column14.controlsource='iif (ptemp1.zdy3=null ,.f.,.t.)'
执行后，只要点击表格，数据就会变成一样的

加了这个就可以了
thisform.grid1.RecordSourceType= 1