设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › 用VB语言数组：随机产生20个学生的计算机成绩，并显示。 ...

用VB语言数组：随机产生20个学生的计算机成绩，并显示。

[复制链接]
查看11 | 回复1 | 2009-5-15 14:43:16 | 显示全部楼层 |阅读模式
很简单的嘛，新建一个工程，将代码拷入：Private Sub Form_Click()Me.AutoRedraw = TrueMe.Height = 6000Me.ClsDim S(5 To 9)For A = 1 To 20d = Int(Rnd() * 70) + 30Print A & "号同学分数为：" & dSelect Case dCase 0 To 59S(5) = S(5) + 1Case 60 To 69S(6) = S(6) + 1Case 70 To 79S(7) = S(7) + 1Case 80 To 89S(8) = S(8) + 1Case 90 ...
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行