已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：
Option Base 1
Private 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 i
End Sub
运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是______。

单项选择题某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：Prirate Sub Command1_Click()Dim a(10)As Integer, max As IntegerFor k=1 To 10a(k)=InputBox( 输入一个整数 )Next kmax=0For k=1 To 10If a(k)＞max Thenmax=a(k)End IfNext kPrint maxEnd Sub运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修改中可以得到正确运行结果的是______。

单项选择题设窗体上有一个文本框Text1和一个命令按钮Command1，并有以下事件过程：Private Sub Command1_Click()Dim s As String, ch As StringS= For k=1 To Len(Text1)ch=Mid(Text1, k, 1)s=ch+sNext kText1. Text=sEnd Sub程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是______。