![](https://cos-cdn.shuashuati.com/pipixue-web/2020-1231-2005-12/ti_inject-812ce.png)
工程中有 Form1 、 Form2 两个窗体。程序运行时,在 Form1 中名称为 Text1 的文本框中输入一个数值 ( 圆的半径 ) ,然后单击命令按钮 “ 计算并显示 ” ( 其名称为 Command1 ) ,则显示 Form2 窗体,且根据输入的圆的半径计算圆的面积,并在 Form2 的窗体上显示出来。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示“请输入数值数据! ” 。请填空。 Private Sub Commandl_C1ick () If Text1.Text = ′′′′ Then MsgBox ′′ 请输入半径! ′′ ElseIf Not IsNumeric ( Text1 ) Then ' IsNumeric函数用来判断参数是否为数字 MsgBox′′ 请输入数值数据! ′′ Else r = Val ( 【 】 ) Form2.Show 【 】. Print ′′ 圆的面积是 ′′&3.14*r*r End If End Sub