| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 578 人关注过本帖
标题:[求助]关于一段程序代码的问题?
只看楼主 加入收藏
yb_playboy
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2006-8-15
收藏
 问题点数:0 回复次数:2 
[求助]关于一段程序代码的问题?

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
这是我的写的简单查询代码。
但是,如果第个条件成不成立,都要执行下面的代码
我是想控制上面的代码。必须成立才执行下面的代码?

请问在什么地方修改?

谢谢了啊

搜索更多相关主题的帖子: thisform bum 代码 
2006-08-18 17:07
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
收藏
得分:0 
把 or 改成 and

两人行已有我师……
2006-08-18 17:08
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
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

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2006-08-18 21:12
快速回复:[求助]关于一段程序代码的问题?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.042761 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved