2. 计算机
  3. 设有程序： Option Base 1 Private Sub Command1_Click() Dim arr1,Max as Integer arr1=Array(12,435,76,24,78,54,866,43)

设有程序： Option Base 1 Private Sub Command1_Click() Dim arr1,Max as Integer arr1=Array(12,435,76,24,78,54,866,43)

admin2012-03-22  23
问题 设有程序：
   Option Base 1
   Private Sub Command1_Click()
   Dim arr1,Max as Integer
   arr1=Array(12,435,76,24,78,54,866,43)
     ________=arr1(1)
   For i=1 To 8
   If arr1(i)＞Max Then  _____
   Next i
   Print"最大值是：";Max
   End Sub
   以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。
选项
答案Max Max=arr1(i)
解析
转载请注明原文地址:https://jikaoti.com/ti/xOO0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)