use aaa
if qybt>0.and.year(ltsj)>2008
   messagebox("*****************",1,"错误提示")
endif
if shf<>200.and.ygxs="全民".and.year(ltsj)<2008
   messagebox("*********！",1,"错误提示")
endif
if shf<>100.and.ygxs="集体".and.year(ltsj)<2008
   messagebox("************！",1,"错误提示")
endif
if dwxz=" "
   messagebox("******************",1,"错误提示")
endif
if ygxs="其他".or.ygxs=" "
   messagebox("**************",1,"错误提示")
endif
use
怎么运行后只显示第二个？应该全部都显示，因为各种条件的记录都有。

因为你的记录号一直处在1号记录在（或者说记录号没有变动），这时所有的判断条件都只针对一条记录，那肯定你现在显示的那样。

如果要实现每个条件判断存在都显示“错误信息”，那你要在IF语句前加一个搜索语句 locate for,我个人喜欢用SELECT 查询方式。

[ 本帖最后由 hw2007name 于 2011-8-8 20:56 编辑 ]

支持楼上
另外你这种建议用do case ... endcase结构 清爽些