1、新建一个excel文件,找到开发工具。
2、新插入一个模块,开始代码编写。
3、声明一个变量,表示学生考的分数。
4、代码部分如下。Dim score As Integerscore = 81If score < 60 Then MsgBox "不及格"ElseIf 80 > score > 60 Then MsgBox "及格"Else MsgBox "优秀"
5、代码运行结果如下。
6、结束判断的语句为endif是固定格式,没有的话运行不了。
1、新建一个excel文件,找到开发工具。
2、新插入一个模块,开始代码编写。
3、声明一个变量,表示学生考的分数。
4、代码部分如下。Dim score As Integerscore = 81If score < 60 Then MsgBox "不及格"ElseIf 80 > score > 60 Then MsgBox "及格"Else MsgBox "优秀"
5、代码运行结果如下。
6、结束判断的语句为endif是固定格式,没有的话运行不了。