1、新建一个excel文件,找到开发工具。

2、新插入一个模块,开始代码编写。

3、声明一个变量,表示学生考的分数。

4、代码部分如下。
Dim score As Integer
score = 81
If score < 60 Then
MsgBox "不及格"
ElseIf 80 > score > 60 Then
MsgBox "及格"
Else
MsgBox "优秀"

5、代码运行结果如下。

6、结束判断的语句为endif是固定格式,没有的话运行不了。

1、新建一个excel文件,找到开发工具。

2、新插入一个模块,开始代码编写。

3、声明一个变量,表示学生考的分数。

4、代码部分如下。
Dim score As Integer
score = 81
If score < 60 Then
MsgBox "不及格"
ElseIf 80 > score > 60 Then
MsgBox "及格"
Else
MsgBox "优秀"

5、代码运行结果如下。

6、结束判断的语句为endif是固定格式,没有的话运行不了。
