题目

用VB设计一个计算圆的面积的程序
表达式及综合应用（新建一个工程,工程名为 计算圆的面积）
定义一个符号常量Pi,其值为3.14159
设计个含有一个文本框控件（用来接收半径r的值）,Button控件以及一个标签控件的窗口,完善下列代码,用标签显示计算出的面积.
Option Explicit
Private Sub Command1_Click()
Label1.Visible = True
Dim r As _____
Dim_______As Double
_____ pi = 3.14159
r = Text1.Text
s = _____
Label1._____ = s
End Sub
Private Sub Form_Load()
Label1.Visible = False
End Sub

提问时间：2020-10-13

答案

Option Explicit
Private Sub Command1_Click()
Label1.Visible = True
Dim r As __single___
Dim____s___As Double
_const____ pi = 3.14159
r = Text1.Text
s = ___2*pi*r__
Label1.__caption___ = s
End Sub
Private Sub Form_Load()
Label1.Visible = False
End Sub