VB程序求半径分别为1、2、3、4、5的圆的面积之和

提问：VB程序求半径分别为1、2、3、4、5的圆的面积之和

Dim sum As Single For n = 1 To 5 sum = sum + _______ Next Label1.Text = "半径为1-5的圆的面积和为：" & sum End SubPrivate Function area(ByVal r As Integer) Dim s As Single Const pi As Single = 3.14159 s = pi * r ^ 2 ________ End Function横线上填空，求半径分别为1、2、3、4、5的圆的面积之和

网友回答：

1。

     sum = sum + area(n)

2。

  area = s

另外。程序本身有错，Label1没有Text的

正确的为

Label1.Caption = "半径为1-5的圆的面积和为：" & sum

程序运行结果