万能百科  > 计算机   > 

[填空题] 设有如下程序:Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integ

2021-07-20   

[填空题] 设有如下程序:Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integerarr1 = Array(12, 435, 76, -24, 78, 54, 866, 43) Min = _________For i = 2 To 8If arr1(i)

正确答案:

arrA(A) , Min = arrA(i)

参考解析:

由于有 Option Base 1 语句,所以数组下标是从 1 开始。本题的功能是查找 8 个数中的最小值,首先 使用 Array 语句给数组赋值,然后把第一个值赋值给最小值变量,及 Min = arr1(1),然后从第二个数开始循 环与最小值比较,如果比最小值小,则把这个值赋值给 Min,即 Min = arr1(i)。

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签