vb小例题

来源：百度知道 编辑：UC知道 时间：2024/06/20 16:47:00
输入上机笔试两门成绩，满分都是100，两门都是85以上就输出"优秀"。都

在60-85之间就输出"通过"。其他输出"不及格"。

这题目怎么编呢？做了一堆的IF语句行不通郁闷了。各位大哥讲解一下。

if 笔试>=85 and 上机>=85 then
print "优秀"
elseif 笔试>=60 and 上机>=60 then
print "通过"
else
print "不及格"
end if

贴代码~~

我先做了两个文本框来分别输入成绩，用一个标签显示最后结果
Private Sub Command1_Click()
mark1 = Val(Text1)
mark2 = Val(Text2)

If mark1 > 85 And mark2 > 85 Then
grade = "优秀"
ElseIf mark1 > 60 And mark2 > 60 Then
grade = "通过"
Else
grade = "不及格"
End If
Label1.Caption = grade
End Sub