问题
填空题
工程中有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
答案
参考答案：(6)Text1.Text (7)Text1.Text (8)Form2
解析： [6]空所在的语句用于检查输入的数据是否为数字，输入的数据由文本框Text1提供，所以[6]空处填Text1.Text。在输入的数据为数字的情况下，因为文本框中的数据不论是否为数字，都为字符型数据，为了进一步的运算，需要将输入的数据用val函数转换为数值型数据存入到变量r中，所以[7]还是填Text1.Text。最后在窗体Form2上显示圆的面积，为了指明输出在窗体Form2上，所以Print方法前应填Form2。