用vb编写定义求圆面积函数,求半径3,3.5,4,4.5时圆的面积

发布时间：2021-02-26 02:59:23

网友回答

函数定义名Area,参数r
Function Area(r)
Area = 3.1415926 * r * r
End Function
调用例子：Private Sub Command1_Click()
Label1.Caption = Area(Val(Text1.Text))
End Sub

以上问题属网友观点，不代表本站立场，仅供参考！