单项选择题

已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：Option Base 1Private Sub Command1_Click()　　Dim sum As Integer　　sum＝0　　For i＝1 To 4　　　　For j＝1 To 3　　　　　　sum＝sum＋score(i， j)　　　　Next j　　　　Print "第" & i & "个学生的总分是："； sum　　Next iEnd Sub运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是(　　)。