题型:单选题 题类:常考题 难易度:普通
浙江省湖州市三贤联盟2020-2021学年高二上学期信息技术期中联考试卷
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中可能出现的是( )
试题篮