当前位置: 高中信息技术 / 综合题
  • 1. (2017·浙江模拟) 用雨量计或雨量器测定,以mm为单位。目前,我国电视和广播节目中发布的日雨量为08~08时,代表前一天的雨量。从键盘输入前一天雨量(用来模拟传感器),点击判断雨量,然后从label3输出雨量

    小雨:1d(或24h)降雨量小于10mm者。

    中雨:1d(或24h)降雨量10~25mm者。

    大雨:1d(或24h)降雨量25~50mm者。

    暴雨:1d(或24h)降雨量50~100mm者。

    大暴雨:1d(或24h)降雨量100~250mm者。

    特大暴雨:1d(或24h)降雨量在250mm以上者。

    Private Sub Command1_Click()

    Dim a As Single

    Dim s as      ①            

    a =         ②             

    If a > 250 Then

        s = "特大暴雨"

    ElseIf a > 100 Then

        s = "大暴雨"

    ElseIf a > 50 Then

        s = "暴雨"

    ElseIf a > 25 Then

        s = "大雨"

    ElseIf a > 10 Then

        s= "中雨"

    ElseIf    ③        Then

        s = "小雨"

    Else

        s = "无雨"

    End If

    Label3.caption=    ④           

    End Sub

    1. (1) 要想让A处在程序运行时显示空白,应设置Text1的属性。
    2. (2) ①处应填
    3. (3) ②处应填 
    4. (4) ③处应填 
    5. (5) ④处应填 

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