填空题

设有如下程序：
Private Sub Command1_Click()
Dim sum As Double, a As Double
sum=0
n=1
For i=1 To 5
a=n*i
n=n+1
sum=sum+a
Next i
End Sub
该程序通过For循环来计算一个表达式的值，这个表达式的值是______。

点击查看答案&解析