填空题

设有如下程序:
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循环来计算一个表达式的值,这个表达式的值是______。

【参考答案】

55