下列不属于Π度烧伤特点的是（）

A、有水疱

B、创底肿胀发红、剧痛

C、可见网状栓塞血管

D、34周愈合

E、愈合不留瘢痕

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