我的目标是这样做:将文件中的数据读入数组,加载列表框,计算每个学生的平均值并确定字母等级,并计算课程平均值:
我声明的变量(全局):
昏暗项目,midterm,hw1,hw2,final,count,average As Integer
Dim letterGrade, lastName, firstName As String
Dim classAverage As Double
Run Code Online (Sandbox Code Playgroud)
我的代码:
Dim array1 As String()= New String(6){}
Dim streamreader1 As StreamReader = File.OpenText("grades.csv")
count = 0
classAverage = 0
Do While (streamreader1.Peek() <> -1)
array1 = Strings.Split(streamreader1.ReadLine(), ",", -1)
firstName(count) = array1(0)
lastName(count) = array1(1)
lstNames.Items.Add(lastName(count) & ", " & firstName(count))
hw1(count) = Convert.ToString(array1(2))
hw2(count) = Convert.ToString(array1(3))
project(count) = Convert.ToString(array1(4))
midterm(count) = Convert.ToString(array1(5))
final(count) = Convert.ToString(array1(6))
average(count) = Math.Round(Math.Truncate((((((hw1(count) + hw2(count)) + (2 * project(count))) …Run Code Online (Sandbox Code Playgroud)