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

Question

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

Answer 1

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

Answer 2

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