当前位置: 高中信息技术 / 单选题
  • 1. (2019高二上·武义月考) 运行如下VB程序:

    Private Sub Command1_Click( )

        Dim x As Integer

        Dim y As String

        x=Val(Text1.Text)

        If x>=95 Then

            y=“非常满意”

        ElseIf x>=80 Then

            y=“满意”

        ElseIf x>=60 Then

            y=“基本满意”

        Else

            y=“不满意”

        End If

        Label1.Caption=y

    End Sub

    在文本框Text1中输入50,单击命令按钮Command1后,在标签Label1中显示(    )

    A . 非常满意 B . 满意 C . 基本满意 D . 不满意

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