试题

试题 试卷

logo

题型:单选题 题类:常考题 难易度:普通

浙江省湖州市三贤联盟2020-2021学年高二上学期信息技术期中联考试卷

有如下VB程序段:

Private Sub Command1_Click()

    Dim i As Integer

    Dim x As Integer

    Dim s As String

    Randomize

    i = 1: s = "1"

    Do While i <= 6

        x = Int(Rnd * 9) + 1

        If x Mod 2 = i Mod 2 Then

            s = s + Str(x)

            i = i + 1

        End If

    Loop

    Label1.Caption = s

End Sub

运行程序后,标签Label1中可能出现的是(    )

A、1 8 3 4 5 2 B、1 9 4 3 7 5 6 C、1 9 4 7 6 5 2 D、1 8 1 2 7 6 1
举一反三
返回首页

试题篮