下列程序代码实现生成20个0~100之间的随机整数，存于数组中，打印数组中大
下列程序代码实现生成20个0~100之间的随机整数，存于数组中，打印数组中大
问题：
[单选]下列程序代码实现生成20个0~100之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。请选择正确的程序段（），完成程序。PrivateSubCommand1Click（）
Dimarr（1To20）
Fori＝1To20
arr（i）＝_________
Textl．Text＝Textl．Text＆arr（i）＆Chr（13）＆Chr（10）
Nexti
Sum＝0
ForEachX
IfX＞50Then
PrintTab（20）；X
Sum＝Sum＋X
EndIf
NextX
PrintTab（20）；”Sum＝”；Sum
EndSub
A.Int（Rnd＊99＋1）Inarr
B.Int（Rnd）Inarr
C.Int（Rnd＊99＋1）Inarr（）
D.Int（Rnd）Inarr（）
参考答案：A
参考解析：
Rnd函数用于产生一个小于1但大于或等于0的实数，题中要求0~100之间的随机整数，所以需要对Rnd产生的实数进行计算处理Int（Rnd＊99＋1）。使用ForEach…Next语句处理数组元素时，Each后只需写出数组名，不能使用小括号。
