VFP 中 显示查询后结果如何显示在表格中,我的查完之后没有显示 15
表单中有一个command1一个表格grid1一个文本框text1一个标签Label1我用的代码:form1thisform.grid1.recordsourcetype...
表单中有一个command1 一个表格grid1 一个文本框text1 一个标签Label1
我用的代码:
form1
thisform.grid1.recordsourcetype=1
thisform.grid1.recordsource=''
thisform.grid1.recordsource='第二应用题'
command1
local cName
cName=alltrim(thisform.text1.value)
select 第二应用题
locate for 学号=cName
if found()
sele 第二应用题.学号,第二应用题.姓名,第二应用题.性别,第二应用题.年龄 from 第二应用题 where 第二应用题.学号=cName order by 第二应用题.学号 into cursor "ling"
thisform.grid1.recordsource="ling"
else
messagebox('查询无此人')
endif
第二应用题 是我用作查询的一个表,我在查询后 无法显示在grid1中 展开
我用的代码:
form1
thisform.grid1.recordsourcetype=1
thisform.grid1.recordsource=''
thisform.grid1.recordsource='第二应用题'
command1
local cName
cName=alltrim(thisform.text1.value)
select 第二应用题
locate for 学号=cName
if found()
sele 第二应用题.学号,第二应用题.姓名,第二应用题.性别,第二应用题.年龄 from 第二应用题 where 第二应用题.学号=cName order by 第二应用题.学号 into cursor "ling"
thisform.grid1.recordsource="ling"
else
messagebox('查询无此人')
endif
第二应用题 是我用作查询的一个表,我在查询后 无法显示在grid1中 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询