为了避免复杂的嵌套If语句,可以使用Select Case语句代替
示例:
Sub text() Tim=Hour(Now) Select Case Tim Case 1 to 11 msgbox'上午' Case 12 msgbox'中午' Case 13 to 16 msgbox'下午' End SelectEnd Sub
语法:
Select Case 测试表达式Case 表达式1 匹配显示的结果Case 表达式2 匹配显示的结果Case 表达式N 匹配显示的结果End Select
Select Case给我们提供了另外一种解决多条件判断的方式。不管白猫黑猫,只要能解决问题就是好的方法,用你自己最习惯最熟悉的方式去解决问题。至此,关于程序结构中的选择结构就讲完了,搞明白这个结构,大部分问题都可以去解决啦,希望各位小伙伴有所收获。
“ 转给那些喜欢的小伙伴吧 ”
我是张小懒
一个爱偷懒、想让自己自信、正在努力向上的家伙
联系客服