do until .....loop 注意数据类型,要等号两边数据类型一至啊。字串用Cstr()整型用:Clng(),Cint()等函数转换。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 do until adors.eof ’本句的意思是直到记录在最后一条才执行,你的要求 对吗?if a=adors!clerkid then ’该句中的类型是否相匹配exit doend ifloop 应该这么写do until adors.eof if a=adors!clerkid then exit do else adors.movenext end ifloop 不会吧,你对这个语句理解了多少啊, do until not adors.eof '''不会吧,要加not的,这下知道为什么找不到吧!if a=adors!clerkid then '''这里数据类型,自己注意啊!exit doend ifloop adors.MoveFirstDo Until adors.eof If a=adors!clerkid Then Exit Do adors.MoveNextLoop 关于多维数组的问题 vb.net做的程序怎么打包? 我的vba中添加的userform的右上角怎么没有最大化最小化按钮阿? 我下载了个李洪根大哥的局域网消息发送器,但一发送就提示找不到NETAPI32.DLL? 如何运行一个程序直到结束,如果超过n秒,就结束它!(急~~~在线等) 如何获取treeview所有节点(包括子节点)的text? 在线求救:! MSComm 如果避免处于在发送接收时,再对其操作 求助:163企业邮箱如何用http协议发送邮件 怎么把注册控件这样的过程作成程序? lihonggen0(李洪根,用VB,标准答案来了) 密码和邮箱被人修改 数据库添加与显示的问题!
if a=adors!clerkid then ’该句中的类型是否相匹配
exit do
end if
loop
do until adors.eof
if a=adors!clerkid then
exit do
else
adors.movenext
end if
loop
do until not adors.eof '''不会吧,要加not的,这下知道为什么找不到吧!
if a=adors!clerkid then '''这里数据类型,自己注意啊!
exit do
end if
loop
Do Until adors.eof
If a=adors!clerkid Then Exit Do
adors.MoveNext
Loop