do until .....loop

[dropingleaf]

我在 用到这个语句在数据库中查询一个记录时
do until adors.eof
if a=adors!clerkid then
exit do
end if
loop
其中 adors是一个adodb.Recordset
不知道为什么总是找不到这个记录？
请多多指点

[mudai]

不会吧，你对这个语句理解了多少啊，
do until not adors.eof '''不会吧，要加not的,这下知道为什么找不到吧！
if a=adors!clerkid then '''这里数据类型，自己注意啊！
exit do
end if
loop

[doubos]

adors.MoveFirst
Do Until adors.eof
If a=adors!clerkid Then Exit Do
adors.MoveNext
Loop

[wangtao_net]

你可以用调试程序试试，如果字符串看看字符串的长度，字母大小写，间空格等等

[unrknight]

adors.movenext

[keyterxian]

注意数据类型，要等号两边数据类型一至啊。
字串用Cstr()
整型用：Clng(),Cint()
等函数转换。

[setfocus]

do until adors.eof ’本句的意思是直到记录在最后一条才执行，你的要求 对吗？
if a=adors!clerkid then ’该句中的类型是否相匹配
exit do
end if
loop

[jew2000]

应该这么写
do until adors.eof
if a=adors!clerkid then
exit do
else
adors.movenext
end if
loop