填空题

工程中有Form1和Form2两个窗体。Form1窗体外观如图5所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Command1)，则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图6所示。如果单击命令按钮，文本框中输入的不是数值，则用信息框显示“请输入数值数据!”。请填空。




Private Sub Command1_Click()
If Text1.Text="" Then
Msgbox "请输入半径!"
ElseIf Not IsNumeric( (6) ) Then
MsgBox "请输入数值数据!"
Else
r=Val( (7) )
Form2.Show
(8) .Print "圆的面积是" & 3.14 * r * r
End If
End Sub