如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据！

Question

2、工程中有Form1和Form2两个窗体。Form1窗体外观如图1所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值（圆的半径），然后单击命令按钮“计算并显示”（其名称为Command1），则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图2所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据！”。请填空。
Private Sub Command1_Click()
If Text1.Text = "" Then
msgbox "请输入半径！"
ElseIf Not IsNumeric(【4】) Then
MsgBox "请输入数值数据！"
Else
r = Val(【5】)
Form2.Show
【6】
End If
End Sub

Answer 1

form2的窗体上有没有什么控件啊 显示的圆的面积要怎么显示出来

Answer 2

【4】： Text1.text【5】： Text1.text【6】： Form2.Print 3.141592653 * r * r