现在有个数据表，里面的字段有编号，名称，含量，合同号等等信息，比如有一条记录的编号为J01C113745，我在组合框中选择J，选择01，选择45，就能找到编号第一位是J，第二三位是01，最后两位是45的记录呢？

[ 本帖最后由 gyyimut 于 2014-8-9 12:46 编辑 ]

可以模糊查询

楼主的这些问题，只要认真看一下帮助中的查找函数，就能解决了。
楼主可以设置一个包含 NOT、 AND、 OR 的查询表单就可以了

可以模仿试试：
select * from 表1 where ATCC('J',编码)>0 and ATCC('01',编码)>0 and ATCC('45',编码)>0 into cursor 表2
表2是筛选了表1的记录，可能不止一条的放在另一个表单中。

为什么非要在另一个表单中显示查询结果(舍近求远)，你这个问题最好的解决方法是在表单上添加一个页框控件。

对啊，在同一个表单中显示查询结果嘛

PUBLIC ARRAY xx[12]
SELECT  biao1
USE  E:\ss\xc\biao1
SELECT flbm1
SELECT flbm2
SELECT flbm3
SELECT flbm4
SELECT flbm5
SELECT flbm6
SELECT flbm7
SELECT flbm8
SELECT flbm9
SELECT flbm10
SELECT flbm11
SELECT flbm12
IF !EMPTY(ALLTRIM())
    LOCATE FOR flbm1.daimahanyi=ALLTRIM()
    xx1=ALLTRIM(flbm1.daima)
ELSE
    xx1="_"
ENDIF
    zfc=xx1
IF  !EMPTY(ALLTRIM())
     LOCATE FOR flbm2.daimahanyi=ALLTRIM()
     xx2=ALLTRIM(flbm2.daima)
ELSE
     xx2="__"
ENDIF
     zfc=zfc+xx2
FOR i=3 TO 12
    IF   !EMPTY(ALLTRIM("(STR(i))+".value"))
          LOCATE  FOR "flbm"+ALLTRIM(STR(i))+".daimahanyi"=ALLTRIM("(STR(i))+".value")
          xx[i]=ALLTRIM("flbm"+ALLTRIM(STR(i))+".daima")
    ELSE
          xx[i]="_"
    ENDIF
    zfc=zfc+xx[i]
ENDFOR
    select * from biao1 where UPPER(alltrim(编码号)) LIKE zfc TO SCREEN
USE



为了实现该功能，本人写了个测试代码，但首次点击查询时会去找路径，再次点击实则提示biao1正在使用当中，不知道是什么原因，还望各位老师指点...

1、定义一个查找表达式：sz查找表达式 = ""

2、读取ComboBox的Value
    如果有效值就截取有效的数据，如“加工方式”的“J”，则：
        sz查找表达式 = sz查找表达式 + 截取有效的数据   && sz查找表达式 = "J"
    如果无效值就用通配符表示如“*”或“?”，则：
        sz查找表达式 = sz查找表达式 + 通配符   && sz查找表达式 = "*"
   
    依次可得：sz查找表达式 = "J01*45"

3、用LIKEC()函数在相应的表查找， 如：
   select biao1
   BROWSE FOR LIKEC(sz查找表达式, 编码号)

[ 本帖最后由 吹水佬 于 2014-8-10 12:15 编辑 ]

请老师帮忙看一下，以下代码错在哪了？？

LOCAL  ARRAY xx[12]
LOCAL zfc
SELECT flbm1
SELECT flbm2
SELECT flbm3
SELECT flbm4
SELECT flbm5
SELECT flbm6
SELECT flbm7
SELECT flbm8
SELECT flbm9
SELECT flbm10
SELECT flbm11
SELECT flbm12
IF !EMPTY(ALLTRIM())
     SELECT daima FROM flbm1 WHERE flbm1.daimahanyi=ALLTRIM() INTO ARRAY xx[1]   &&提示SQL语句无效
ELSE
    xx[1]="*"
ENDIF
    zfc=xx[1]
IF  !EMPTY(ALLTRIM())
     SELECT daima FROM flbm2 WHERE flbm2.daimahanyi=ALLTRIM() INTO ARRAY xx[2]   &&提示SQL语句无效
ELSE
     xx[2]="**"
ENDIF
    zfc=zfc+xx[2]     &&提示操作符/操作数类型不匹配
FOR i=3 TO 12
    IF   !EMPTY(ALLTRIM("(STR(i))+".value"))
          SELECT daima FROM "flbm"+ALLTRIM(STR(i)) WHERE  "flbm"+ALLTRIM(STR(i))+".daimahanyi"=ALLTRIM("(STR(i))+".value")  INTO  ARRAY xx[i]       &&提示SQL语句无效
    ELSE
          xx[i]="*"
    ENDIF
          zfc=zfc+xx[i]      &&提示操作符/操作数类型不匹配
ENDFOR
   select  biao1
   BROWSE FOR LIKEC(ALLTRIM(zfc),编码号)=.t.

[ 本帖最后由 gyyimut 于 2014-8-10 18:29 编辑 ]