下列程序代码实现生成20个0~100之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。请选择正确的程序段（　　），完成程序。
Private Sub Co mmand1Click（　　）
Di marr（1To 20）
For i ＝1To 20
arr（i）＝_________
Textl ．Text ＝Textl ．Text ＆arr（i ）＆Chr（13）＆Chr（10）
Next i
Sum＝0
For Each X
If X＞50Then
Print Tab（20）；X
Sum＝Sum＋X
End If
Next X
Print Tab（20）；＂Sum＝＂；Sum
End Sub