Question

vfp 操作符与操作类型不匹配是什么原因?怎么解决？

select distinct 学号,课程号,成绩 from cj INTO TABLE no
IF thisform.txt学号=ALLTRIM(no.学号) THEN
thisform.txt课程号=ALLTRIM(no.课程号)
thisform.txt成绩 =ALLTRIM(no.成绩)
ENDIF
thisform.Refresh

Answer 1

比如这里ALLTRIM(no.学号)

该函数是去除空格的, 里面的必须是字符型, 假如你的学号是数字, 就出错

我认为最可能是这里出错:
ALLTRIM(no.成绩)

因为成绩肯定是数字的!!!不能去除空格

追问

字段都是字符型的

追答

出错时会弹出窗口,点"挂起", 可以知道是哪行代码出错

追问

if语句 那一行

追答

thisform.txt学号 包括后面的语句, 都少了 .value

thisform.txt学号.value

追问

改写后运行有重复出现

追答

你在表单的init中加这个代码:
set safety off
就不会跳出这个提示了

改写后的代码截图

追问

点击查询没反应了

追答

先要看你的 no 表是否生成. 生成了是否有内容, 菜单"窗口'--"数据工作期"里查看

追问

我加多10财富，你帮我写个查询的代码吧

追答

你的意思是学号不能重复? 你的语句里列出学号,课程号,成绩都不一样的, 假如一个学号有2个课程号, 也列出.
而且你的目的是什么? 我还没搞明白,你是生成一个表, 然后也没搜索,直接就显示. 请详细说清楚

追问

点击查询的时候要能够查询，输入学号就可以了，假如一个学号有两个课程号也要能查询。他的数据环境是CJ.dbf.点击输入时能将数据输入到cj.dbf

追答

你的意思是不是这样:
在3个文本框里输入值, 点输入, 可以将输入的存到cj表
输入学号, 点查询,查询该学号的课程信息? 但是结果输出到哪? 文本框? 多个记录呢?

追问

直接输入到文本框，要是你觉得输出一个新窗体容易也行。就是要能够使那两个命令能够执行就可以了

追答

输出结果应该用表格控件,可以显示多个记录
而且无需用select sql命令, 用set filter to 过滤下就行了
select cj
set filter to alltrim(学号)=alltrim(thisform.txt学号.value)

而且我还没明白你的意思,你先说输入到文本框, 后又说输出一个新窗体, 输入输出不要搞混吧,这样我更难理解