题库 高中信息

题干

   编写VB程序,实现如下功能:在文本框Text1和Text2中分别输入体重(单位:Kg)和身高(单位:m),单击命令按钮Command1,计算BMI指数(BMI指数=体重÷身高的平方),如果BMI <18.5,则在标签Label5中显示“体重过轻!”;如果18.5≤BMI≤25,则在标签Label5中显示“正常!”;如果BMI>25,则在标签Label5中显示“体重过重!”。运行效果如左图所示。


(1)若要删除标签Label5中显示的内容“Label5”,可在其属性窗口(如上边右图)中将___________属性的属性值删除。
(2)为实现上述功能,请在划线处填入合适代码或选项。
Private  Sub  Command1_Click()
Dim  gao  as  single, zhong  as  single, bmi  As  Single
Dim  x  As  String
zhong = val(text1.Text)
gao =val(text2.text)
bmi = _____________ 
If  bmi < 18.5  Then
x = "体重过轻!"
Else
If  bmi<=25  Then  x = "正常!"  Else  x = "体重过重!"
End If
______________
End Sub
(3)若某同学的身高为160cm,体重为120斤,则运行结果为___________
上一题 下一题 0.99难度 填空题 更新时间:2019-05-05 07:08:11

答案(点此获取答案解析)