这样肯定没问题，关键是如何宏替换
jj1=''
jj2=''
jj3='秋‘
jj4=’冬‘
jj5=''
jj6=''

在表单中？还是在ＰＲＧ中？

表单中

用ＣＡＳＥ　ＥＮＤＣＡＳＥ　命令试试

[此贴子已经被作者于2018-10-14 13:41编辑过]

我是要在表里查询符合条件的记录，用ＣＡＳＥ　ＥＮＤＳＣＡＮ 没有用吧，我现在有比较麻烦的办法，就是对每个值用一条查询语句，然后再union all

这样太繁琐，我想优化代码

select * from 基础信息 where allt(信息名称)==jj1;
union all;
select * from 基础信息 where allt(信息名称)==jj2;
union all;
select * from 基础信息 where allt(信息名称)==jj3;
union all;
select * from 基础信息 where allt(信息名称)==jj4;
union all;
select * from 基础信息 where allt(信息名称)==jj5;
union all;
select * from 基础信息 where allt(信息名称)==jj6;
into cursor ls

不就6个条件吗

表单长什么样子

我主要是想学习一下如何用宏来替换，如果是值比较多的情况，这样的写法太繁琐了，特别是还要和其他的表做复合查询

如果是宏来替换，一条语句就完成
select * from 基础信息 where allt(信息名称) in（宏）into cursor ls