ri=allt(thisform.text1.value)
bum=allt(thisform.combo1.value)
IF EMPTY(thisform.text1.Value)
MESSAGEBOX("请输入日期...",0+48,"提示！")
thisform.text1.SetFocus
IF EMPTY(thisform.combo1.Value)
MESSAGEBOX("请输选择部门名称....",0+48,"提示！")
thisform.combo1.SetFocus
ELSE
thisform.grid1.recordsource="select * from zafei zafei where ri$日期 .or. bum$部门 into table a"
ENDIF
ENDIF
这是我的写的简单查询代码。
但是，如果第个条件成不成立，都要执行下面的代码
我是想控制上面的代码。必须成立才执行下面的代码？

请问在什么地方修改？

谢谢了啊

把 or 改成 and

ri=allt(thisform.text1.value)
bum=allt(thisform.combo1.value)
IF EMPTY(thisform.text1.Value)
MESSAGEBOX("请输入日期...",0+48,"提示！")
thisform.text1.SetFocus
ELSE
IF EMPTY(thisform.combo1.Value)
MESSAGEBOX("请输选择部门名称....",0+48,"提示！")
thisform.combo1.SetFocus
ELSE
thisform.grid1.recordsource="select * from zafei zafei where ri$日期 .or. bum$部门 into table a"
ENDIF
ENDIF