下列程序的执行结果是( )
Function P(N As Integer)
For i＝1 To N
Sum=Sum+i
Next i
P＝Sum
End Function
Private Sub Command1 Click()
S=P(1)+P(2)+P(3)+P(4)
Print S:
End Sub

A．15
B．16
C．20
D．25

咳嗽不爽，痰多，脘腹胀满，大便秘结，苔白而干，此证辨为秋燥病（）。