代码如下，红色部分出错。代码是在combo2控件的click事件里。


close all
use 噪声评价nr曲线
s=
select 频带125hz from 噪声评价nr曲线 where nr值=&s into array A
thisform.text8.value=A
select 频带250hz from 噪声评价nr曲线 where nr值=&s into array B
thisform.text9.value=B
select 频带500hz from 噪声评价nr曲线 where nr值=&s into array C
thisform.text10.value=C
select 频带1000hz from 噪声评价nr曲线 where nr值=&s into array D
thisform.text11.value=D
select 频带2000hz from 噪声评价nr曲线 where nr值=&s into array E
thisform.text12.value=E
select 频带4000hz from 噪声评价nr曲线 where nr值=&s into array F
thisform.text13.value=F
use

PS:问题就出在combo2控件上。如果单击combo2的下拉箭头并且选择里面的内容的话，没有任何问题。但是一旦点击下拉箭头左边的文字部分的话就会弹出上述错误信息。请各位高手帮忙，小弟新手，在此先谢过了！

不应该用&S 直接用S试试？

2楼的，谢谢你的关注，按照你说的试了试，这次还是不行，弹出“操作符/操作数类型不匹配”，挂起后错误还是指向刚才那行红色代码

很可能是COMBO2没有设置好，挂起后再检查一下S的值及数据类型。

按下面的改一下试试
use 噪声评价nr曲线  &&此行命令可以不要
s=displayvalue
select 频带125hz from 噪声评价nr曲线 where nr值=s into array A &&不要使用宏替换

原因见5楼~  改为:

close all
s=val()
select 频带125hz from 噪声评价nr曲线 where nr值=s into array A
thisform.text8.value=A(1)

... && 下同, 但看你代码的意思, 也可以 把后面所有select语句 和上面那第一句select  合并为一句, 没有必要分开筛选, 弄出这么一大段的代码来~


[ 本帖最后由 茵梦湖 于 2010-6-14 12:16 编辑 ]

请问displayvalue 和value有什么区别

非常感谢大家的帮助！问题解决了。经过多次调试发现当combo控件的显示值是空值的时候，点击combo就会在噪声评价nr曲线表里找不到对应为空的nr值，于是弹出错误。于是我加了一段代码如下：
if empty(s)=.t.
messagebox("不能为空！",48+0,"提示")
else
....
endif
再次感谢大家！谢谢你们的热心帮助！

displayvalue是实时显示出来的值,面Value则是COMBO控件里的序列值。来自百度，呵呵

displayvalue是实时显示出来的值,面Value则是COMBO的序列值