首先看看Select Case的语法如下 。
[Select Case语句的语法]
Select Case 测试表达式
Case 条件表达式1
语句块1
Case 条件表达式2
语句块2
Case 条件表达式3
语句块3
……
Case 条件表达式n
语句块n
Case Else
语句块Else
End Select.
注意哦,这种语句是在VBA代码当中使用的 。下面提供例子,其功能用来评判成绩的等级的,分别为优秀、良好、及格、不及格等情况 。
If [a1].Value = https://www.taobao49.com/264932/“” Then
MsgBox “A1单元格没有输入数字 。”
Exit Sub ‘ 退出程序
End If
Select Case [a1].Value
Case Is < 30
MsgBox “差”
Case Is < 60
MsgBox “不及格”
Case Is < 80
MsgBox “及格”
Case Is < 90
MsgBox “良好”
Case Else
【首先看看Select Case的语法如下】MsgBox “优秀”
推荐阅读
- 阿尔法罗密欧图片 罗密欧汽车图片
- 进门对门好吗 房子进门对门有什么不好
- 它的格式是xxxxxxxx类型的
- 整容能改变运势吗 整容改变人生
- J For I = 1 To 1000 Step 2 J = J + I Next MsgBox 1到1000之间奇数和为 J End Sub 第二种代码:变量递减 Sub 求1到1000之间奇数和2 Dim I
- 从死神开始的日常 全职守夜人
- 黑白的时代也就一去不复返了
- 柚子好酸怎么办
- 电脑性能和性价比的区别 – 笔记本电脑什么牌子好