VB编程要求按照考试成绩的等级输出百分制分数段,A等为85分以上,B等为70-84,C等为60-69,D等为60分以下,等级由键盘输入

Question

VB编程要求按照考试成绩的等级输出百分制分数段,A等为85分以上,B等为70-84,C等为60-69,D等为60分以下,等级由键盘输入

Answer 1

dim lvl as string
lvl = inputbox("Level","Tip")
if lvl = "a" or lvl = "A" then
msgbox("85 above")
elseif lvl = "b" or lvl = "B" then
msgbox("70-84")
elseif lvl = "c" or lvl = "C" then
msgbox("60-69")
elseif lvl = "d" or lvl = "D" then
msgbox("60 below")
end if
也可以用select,自己参考书上吧