下列程序代码实现生成20个0～100之问的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。请选择正确的程序段( )，完成程序。
Private Sub Command1 Click()
Dim arr(1 To 20)
For i=1 To 20
arr(i)=______
Text1. Text=Text1. Text＆arr(i)＆Chr(13)＆Chr(10)
Next i
Surn=0
For Each X______
If X＞50 Then
Print Tab(20)；X
Sum=Sum+X
End If
NextX
Print Tab(20)；"Sum="；Sum
End Sub