中科新闻网天国的阶梯大结局剧情:VB程序问题:高手快进
来源：百度文库 编辑：中科新闻网 时间：2024/04/29 14:51:51
有错吗?
sub asp()
dim s as string 's为学生成绩分数情况
dim g as double 'g学生成绩
g=60
select g
case 0 to 59
s="不合格"
case 60 to 70
s="合格"
case 71 to 90
s="优秀"
case else
s="状元"
end select
sub asp()
dim s as string 's为学生成绩分数情况
dim g as double 'g学生成绩
g=60
select g
case 0 to 59
s="不合格"
case 60 to 70
s="合格"
case 71 to 90
s="优秀"
case else
s="状元"
end select
不要问什么问题都说高手进
这么简单的问题,地球人都会
首先我说我不是高手
你的问题没有说明要问什么,
没错