vb.net 刚学吗？谢谢了

已知6个学生的成绩，通过对数组赋初值的方法，以每5分为一个“★”显示，并显示产生的成绩。
提示：
通过Mid函数根据产生的分数四舍五入取子字符串，有关表达式如下：Mid(s,1,Math.Round(a(i)/5))
期中，s为已有20个“★”的字符串变量，Round为四舍五入取整函数。