[填空题] 以下程序代码实现单击命令按钮Command1时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。 Pri
2021-07-20
[填空题] 以下程序代码实现单击命令按钮Command1时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。
Private Sub Command.Click()
Dim arr(1 To 20)
For i=1 To 20
arr(i)= (14)
Text1.Text=Text1.Text&arr(i)&Chr(13)&chr(10)
Next i
Sum=0
For Each x In arr
If x＞50 Then
Print Tab(20);x
Sum= (15)
End If
Next x
Print Tab(20);"Sum=";Sum
End Sub
正确答案：Int(Rnd*99+1)
词条内容仅供参考，如果您需要解决具体问题
（尤其在法律、医学等领域），建议您咨询相关领域专业人士。