2. 计算机
  3. 工程中有Form1、Form2两个窗体。Forml窗体外观如图1所示。程序运行时，在Forml中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Commandl)，则显示Form2窗体，且根据输入的圆的半径计算圆

工程中有Form1、Form2两个窗体。Forml窗体外观如图1所示。程序运行时，在Forml中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Commandl)，则显示Form2窗体，且根据输入的圆的半径计算圆

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

Private Sub Command1_Click()
IfText1．Text=””Then
MsgBox”请输入半径!”
ElseIf Not IsNumerie(【  】)Then
MsgBox“请输入数值数据!”．
Else
r=Val(【  】)
Form2．Show
【  】．Print”圆的面积是”&3．14”r*r
End If
End Sub
选项
答案Text1．Text,Textl．Text,Form2
解析 lsNumeric是一个字符串函数，其参数是一个字符串或者数字，返回值是…个布尔值，如果这个参数是纯数字组成，将会返回Trile，否则将返回False，在这里作用是为了检验文本框中输入的是否为纯数据即数值数据，所以第6个空应该填Textl．Text；在判断完成以后要将Text1中的文本内容转化为数字，因此第7个空也应填Textl．Text；最后输入的结果要在Form2中显示出来，所以第8个空应该填Form2，表示利用的是Form2的Print方法。
转载请注明原文地址:https://kaotiyun.com/show/2Qmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)