当前位置: 高中信息技术 / 综合题
  • 1. (2020高二上·浙江期中) COD(化学需氧量)是衡量水质污染程度的重要指标之一,污水处理时根据污水的COD指标来计算COD去除剂的投放量。

    程序界面如图1所示,在本框Text1中输入COD指标,单击“计算投放量”按钮(Command1)后,程序根据COD指标计算出合适的COD去除剂投放量,并在标签Label3中输出计算结果。

    污水处理厂根据COD指标投放COD去除剂的标准如下表所示:

    当前COD指标X

    根据COD指标应投放COD去除剂的剂量

    X<50

    10

    X≥50并且X≤500

    X>500

    3X

    图 1

    图2

    1. (1) 在设计界面时,应使用图2所示“控件工具箱”中的(填写相应编号)添加“计算投放量”按钮。
    2. (2) 为实现上述功能,请在划线处填入合适代码。

      Private Sub Command1_Click( )

          Dim x As Single,s As Single

          x =Val(Text1. Text)

          If x < 50 Then

              s=10

          ElseIf 

             

          Else

              s=3*x

          End If

          Label3. Caption= 

      End Sub

微信扫码预览、分享更方便