信息技术VB练习题求解某地的酸雨程度可以根据当地年均降水的PH值来判断,酸雨区的判断标准如下表所示:重度酸雨区 轻中度酸雨区 非酸雨区 年均PH值 <= 4.7 <= 5.6 >5.6 打开并修改考生
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/22 14:06:51
信息技术VB练习题求解某地的酸雨程度可以根据当地年均降水的PH值来判断,酸雨区的判断标准如下表所示:重度酸雨区 轻中度酸雨区 非酸雨区 年均PH值 <= 4.7 <= 5.6 >5.6 打开并修改考生
信息技术VB练习题求解
某地的酸雨程度可以根据当地年均降水的PH值来判断,酸雨区的判断标准如下表所示:重度酸雨区 轻中度酸雨区 非酸雨区 年均PH值 <= 4.7
<= 5.6 >5.6
打开并修改考生文件夹下“VB”文件夹中的工程文件“rain.vbp”,使其具有下列功能:在文本框Text1中输入某地区年降水量PH值,单击“判断”按钮(Command1),在标签Label2上显示对应的酸雨程度.程序运行效果如图所示:
完成下列操作:
(2)删除窗体中名为“Timer1”的对象.为命令按钮Command1选择合适的事件过程,该事件过程的代码可以从“VB”文件夹下的“code.txt”文件中得到.
(3)在注释①所在行处填入正确的语句,并利用图中的数据进行测试,使程序实现上述功能.程序调试正确后,生成“rain.exe”,保存在“VB”文件夹中.
保存窗体文件和工程文件.
Dim ph As Single,s As String
ph = Val(Text1.Text)
If ph <= 4.7 Then
s = "重度酸雨区"
Else
If ph <= 5.6 Then
s = "轻中度酸雨区"
Else
s = "非酸雨区"
End If
'①
Label2.Caption = s
问:'①怎么填
信息技术VB练习题求解某地的酸雨程度可以根据当地年均降水的PH值来判断,酸雨区的判断标准如下表所示:重度酸雨区 轻中度酸雨区 非酸雨区 年均PH值 <= 4.7 <= 5.6 >5.6 打开并修改考生
一处填 End if
题目中的第二个if是第一个if的子语句 也就是说第二个if是在ph>4.7的前提下的
所以第一个if还缺少一个endif