填空题
设有程序:
Option Base 1
Private Sub Command1_Click()
Dim arr1,Max as Integer
arr1=Array(12,435,76,24,78,54,866,43)
【12】
=arr1(1)
For i=1 To 8
If arr1(i)>Max Then
【13】
Next i
Print"最大值是:";Max
End Sub
以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。请填空。
【参考答案】
[12] Max
[13] Max=arr1(i)
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
由Array函数建立的数组的名字必须是 【11】 类型。
点击查看答案&解析
填空题
在菜单编辑器中建立一个菜单,名称为mymenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。 Form1. 【10】 mymenu
点击查看答案&解析
相关试题
设有如下程序: Private Sub Form_Clic...