题目

编写VB程序,实现如下功能:在文本框Text1和Text2中分别输入体重(单位:kg)和身高(单位:m),单击命令按钮Command1,计算BMI(体重指数)(体重指数等于体重(kg)除以身高(m)的平方)。 如果BMI<18.5,则在标签Label5中显示“体重过轻!”;如果18.5≤BMI≤25,则在标签Label5中显示“体重正常!”;如果BMI>25,则在标签Label5中显示“体重过重!”。运行效果如图所示。 (1) 若要删除标签Label5中显示的内容“Label5”,可在其属性窗口中将属性的属性值删除。 (2) 为实现上述功能,请在画线处填入合适的代码。 Private Sub Command1_Click( )   Dim h As Single, m As Single, bmi As Single   Dim x As String   m=Val(Text 1.Text)   h=Val(Text2.Text)       ①       If bmi<18.5Then     x="体重过轻!"   Else     If    ②    Then x="体重正常!"Else x="体重过重!"   End If   Label5.Caption=x End Sub 画线处应填入的代码为:①;②。 (3) 若某同学的身高为160cm,体重为110斤,则Label5显示的结果为。 答案: 【1】Caption 【1】bmi=m/h^2【2】bmi<=25 【1】体重正常!
信息技术 试题推荐
最近更新