可用于求10个整数中最大值的某VB程序段如下: Dim a(1 To 10) As Integer Dim max As Integer max=0 For i=1 To 10 If a(i)>max Then max=a(i) Next i Label1.Caption =“最大值是:”+ Str (max) 运行该程序时发现,当输入10个正整数时可以得到正确结果,但当输入10个负整数时结果错误。将上述程序段中相应语句仅进行一次更改,就可实现输入10任意整数都能得到最大值的结果,则下列修改正确的是( )
A . 把If a(i)>max Then max=a(i)改成If a(i)<max Then max=a(i)
B . 把max= a(i)改成a(i) = max
C . 把For i = 1 To 10改成For i=2 To 10
D . 把max=0改成max=a(1)
答案:D