编程序 输入一整数 在60分以下为不合格,在60??80分之间为合格,80分以上为
编程序 输入一整数 在60分以下为不合格,在60??80分之间为合格,80分以上为
日期:2017-01-10 16:06:09 人气:1
Private Sub Form_Load()
dim a as integer,b as string
a=inputbox("请输入考生分数:","输入框")
a=val(a)
if a<60 then
b="不及格"
else if a>=60 and a<=80 then
b="合格"
else
b="优秀"
End if
print b