我在增加数据时是先比较数据库表里面有没有相同的记录存在，如果有的话要重新输入，但为什么他总是比较第一行记录呢！当我输入第一行记录的编号他会提示我有相同的记录存在，但当我输入其他行记录的编号后点保存后程序什么反映也没有了！

就是这个图片中我在增加窗口的仓库编码里面输入0003他会提示我有相同的记录存在
但当我输入0004时点保存后程序什么反映也没有了]

string s1=''
string s2=''

s2 = trim(sle_1.text) (例如:0004)
select 仓库编码 into :s1 from table where 仓库编码 = :S2;
if Isnull(s1) = false and s1 = s2 then
messagebox("系统提示!","你输入的编号 '"+s2+"'已经存在!")
return
end if