如何修改MAX的启动画面？

某人编写了下列程序，用来求10个整数(整数从键盘输入)中的最大值： Private Sub Command1_Click() Dim a(10) As Integer, max As Integer For k=1 To 10 a(k)=InputBox("输入一个整数") Next k max=0 For k=1 To 10 If a(k)＞max Then max=a(k) End If Next k Print max End Sub 运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的。程序需要修改。下列修改中可以得到正确运行结果的是( )。

A．把Ifa(k)＞max Then 改为 If a(k)＜max Then

B．把max=a(k)改为a(k)=max

C．把第2个循环语句For k=1 To 10改为For k=2 To 10

D．把max=O改为max=a(10)

某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下： Function MaxValue(aAsInteger)As Integer Dim max％：max=1 For k=2 TO 10 If a(k)>a(max)Then max=k End lf Next k MaxValue=max End Function 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是。 A．语句max=1应改为max=a(1) B．语句For k=2 TO 10应改为For k=1 TO 10 C．If语句中的条件a(k)>a(max)应改为a(k)>max D．语句MaxValue=max应改为MaxValue=a(max)

（ 31 ）某人编写了一个能够返回数组 a 中 10 个数中最大数的函数过程，代码如下：

Function MaxValue(a() As Integer) As Integer

Dim max%

max=1

For k = 2 To 10

If a(k)>a(max) Then

max = k

End If

Next k

MaxValue = max

End Function

程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是

A ）语句 max = 1 应改为 max = a(1)

B ）语句 For k = 2 To 10 应改为 For k = 1 To 10

C ） If 语句中的条件 a(k)>a(max) 应改为 a(k)>max

D ）语句 MaxValue = max 应改为 MaxValue = a(max)

某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下：

程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是（ ） 。

A. 语句max=1应改为max=a(1)

B. 语句For k=2 To 10应改为For k=1 To 10

C. If语句中的条件a(k)>a(max)应改为a(k)>max

D. 语句MaxValue=max应改为MaxValue=a(max)

A.出现系统画面，但无法启动

B.画面停留在Windows启动界面

C.识别硬盘，但无法启动

D.修改B工OS后黑屏

此题为判断题(对，错)。