以下程序代码实现单击命令按钮Command1时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。Dim arr(1 To 20)For i=1 To 20arr(i)=【 】Next iSum=0For Each X In【 】If X＞50 ThenPrint Tab(20)；XSum=Sum+XEnd IfNext XPrint Tab(20)；“Sum＝”；Sum
题目
以下程序代码实现单击命令按钮Command1时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。
Dim arr(1 To 20)
For i=1 To 20
arr(i)=【 】
Next i
Sum=0
For Each X In【 】
If X＞50 Then
Print Tab(20)；X
Sum=Sum+X
End If
Next X
Print Tab(20)；“Sum＝”；Sum
相似考题
更多“以下程序代码实现单击命令按钮Command1时生成20个(0,100)之间的随机整数,存于数组中,打印数组中 ”相关问题
-
第1题：
以下程序代码实现单击命令按钮Commandl时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。
Dimalt(1 To 20)
Fori=1 To 20
arr(i)=
Nexti
Sub=0
For Each X In arr
If X＞50 Then
Print Tab(20)；X
Sum=Sum+X
End If
Next X
Print Tab(20)；"Su
正确答案：Int(Rnd*99+1)
Int(Rnd*99+1) -
第2题：
假定通过复制、粘贴操作建立了一个命令按钮数组 Command1，以下说法中错误的是 ______。
A．数组中每个命令按钮的名称(Name属性)均为Command1
B．若未作修改，数组中每个命令按钮的大小都一样
C．数组中各个命令按钮使用一个Click事件过程
D．数组中每个命令的按钮的Index属性值都相同
正确答案：D
解析：控件数组由一组相同类型的控件组成，这些控件共用一个相同的控件名字(Name属性)，具有同样的属性设置，因此选项A正确。数组中的每个控件都有唯一的索引号(Index Number)，即下标，所以数组中每个命令按钮的Index属性值都不相同，因此选项D错误。控件数组共享同样的事件过程，因此数组中各个命令按钮使用同一个Click事件过程，选项C正确。通过复制、粘贴操作建立的命令按钮数组Command1，若未作修改，数组中每个命令按钮的大小都是一样的，因此选项B正确。 -
第3题：
假定通过复制、粘贴建立了一个命令按钮数组Command1，则以下说法中错误的是 ______。
A．数组中每个命令按钮的名称(Name属性)均为Command1
B．数组中每个命令按钮的大小都一样
C．数组中每个命令按钮可以使用同一个事件过程
D．用名称Command1可以访问数组中每个命令按钮
正确答案：D
-
第4题：
假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是
A．数组中每个命令按钮的名称(Name属性)均为Command1
B．数组中每个命令按钮的标题(Caption属性)都一样
C．数组中所有命令按钮可以使用同一个事件过程
D．用名称Command1(下标)可以访问数组中的每个命令按钮
正确答案：B
解析：本题考查控件数组的概念。控件数组由一组相同类型的控件组成，这些控件共用一个相同的名字，具有同样的属性设置。数组中的每个控件都有惟一的下标，且其所有元素的Name属性必须相同，选项A说法正确。控件数组的名字是由Name属性指定的，而控件数组中的每个元素则是用Index属性指定的，选项D说法正确．数组中每个命令按钮的标题(Caption属性)可以相同，也可以不同，选项B说法错误，应为所选。数组中所有命令按钮可以使用同一个事件过程，也可以使用不同事件过程，选项C说法正确。 -
第5题：
假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是______。
A．数组中每个命令按钮的名称(Name属性)均为Command1
B．数组中每个命令按钮的标题(caption属性)都一样
C．数组中所有命令按钮可以使用同一个事件过程
D．用名称Command1(下标)可以访问数组中的每个命令按钮
正确答案：B
解析：控件数组中的各个元素共享Name属性。控件数组的每个元素都有一个与之关联的下标，或称索引(Index)，下标值由Index属性指定，即数组中的每个元素则由Index属性指定。控件数组中的每个命令按钮的标题(Caption属性)可以各不相同。