多分支处理

best_boy 2008-02-23 10:41:47
a1,a2为一表中的数字型字段(内部关系a1<a2)
b1,b2为另一表中的数字型字段(b1<b2)
当b2<a1或b1>a2时,不执行操作
当b1<=a1且b2<=a2时,t=b2-a1
当b1>a1且b2>a2时,t=a2-b1

怎么实现啊
...全文
30 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
wangwei1979 2008-02-24
if b1<=a1 and b2<=a2 then
t=b2-a1
elseif b1>a1 and b2>a2 then
t=a2-b1
end if
回复
best_boy 2008-02-24
b1,b2(b1<b2)与a1,a2(a1<a2)相比应该有几种情况啊?
是不是5种啊

1.b2<a1
2.b1>a2
3.b1<=a1 and a1<b2<=a2
4.a2>b1>=a1 and b2>a2
5.a1<=b1 and b2<=a2

用if语句写是不是很繁锁啊
select case可以写吗?


回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7490

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2008-02-23 10:41
社区公告
暂无公告