for 循环中 messagebox() 不起作用，是怎么回事？我想在for 循环中，当不满足条件时结束循环并弹出提示，应该怎么做。

当时我是这么做的：
for I=1 to …… STEP 1
LOCATE FOR 序号=I
   IF !FOUND()  
       MESSAGEBOX("序号为:"+ I +" 的记录不存在，请检查...",0+32,"提示")
       loop
   ENDIF
……
endfor

这样虽然实现了记录号不存在时程序就跳出停止的要求，但却没有弹出messageboxr的提示，这是为什么？有什么办法呀？


我的表单位中设计一个text1，在text1中输入相应的记录编号，然后对登记表中这些记录的有一个叫“状态”的字段进行标记。这样设计的目的就是检查输入的记录号是否有错误，如有错误就弹出提示，而且要提示出是哪条记录输错了。我VFP9.0执行时就没有弹出。

[ 本帖最后由 qshuju 于 2013-2-21 16:01 编辑 ]

跳出停止的要求----是什么意思？

loop 好象是EXCEL的宏里用的

测试没问题，可以弹出messagebox的提示窗。


[ 本帖最后由 qjbzjp 于 2013-2-21 14:54 编辑 ]

是不是用于查找序号中的缺号

应该是可以弹出的。

我的表单位中设计一个text1，在text1中输入相应的记录编号，然后对登记表中这些记录的有一个叫“状态”的字段进行标记。这样设计的目的就是检查输入的记录号是否有错误，如有错误就弹出提示，而且要提示出是哪条记录输错了。我VFP9.0执行时就没有弹出。

没有弹出，是因为if !found()的条件不成立。为什么不成立？要看你的数据表实际数据有没有符合条件的记录，但你的代码有一个漏洞，locate for是从当前记录开始往下找的，只有加all参数，才会从头到底开始找，因此实际结果取决于你的数据分布。

messagebox中少了个I，打入小写的I，发表后就没有了。你加上试试。

在楼主的代码中，I是循环变量名，是数值型数据。那末在messagebox()函数中应该转化成字符型才能正常显示。