excel设计if语句怎么填？

关键字：excel 更新时间：2018-08-13 11:21:13 155次访问

点击“确定”按钮的事件中的代码修改为：

Private Sub CommandButton1_Click()

On Error Resume Next

x = CSng(TextBox1.Value)

If Err <> 0 Then MsgBox "您的输入的不是数字！": Exit Sub

If TextBox1.Value < 60 Then

MsgBox "您的成绩为不及格。"

ElseIf TextBox1.Value < 80 Then MsgBox "您的成绩为及格。"

ElseIf TextBox1.Value < 90 Then MsgBox "您的成绩为良好。"

ElseIf TextBox1.Value <= 100 Then MsgBox "您的成绩为优秀！"

Else

MsgBox "您输入的分数超出了考试成绩范围。"

End If

如果IF不会，那么窗体可能就更困难了吧。

相关标签：excel