![[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名](http://www.mshxw.com/aiimages/31/256044.png "[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名")
[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Command1)，则显示Form2窗体，且根据输入的圆半径计算圆的面积，并在Form2的窗体上显示出来，如下图右图所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据”。请填空。
![[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名](/uploadfile/member/20180926/1537964042.jpg "[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名")
Private Sub Command1_ Click()
If Text1.Text=" " Then
MsgBox"请输入半径!"
Else If NOt IsNumeric(______)Then
MsgBox"请输入数值数据!"
Else
r=Val()
Form2.show
______.Print"圆的面积是"＆3.14*r*r＆
End If
End Sub
参考答案：
Text1.Text Text1.Text Form2问题解析:
第一空：判断输入内容是否为数字，第二空：取得输入的半径值，第三空：在Form2上显示结果。
