试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省91高中联盟2018-2019学年高二下学期信息技术期中考试试卷
Private Sub Command1_Click()
Dim x As Integer, m As Integer
m = 3
For x = 1 To 5
If m > 3 Then m = m + 2 Else m = m - 1
Next x
Text1.Text = Str(m)
End Sub
S=0
For i=1 To 3
s=s+2
Next i
Print s
x=Text1.Text
p=0
For i=1 to Len(x)
If Mid(x,i,1)=“a” Then p=p+1
Print p
若程序运行时,在文本框Text1中键入“Are you happy”,则运行结果是( )
PRIVATE SUB FORMCLICK
FOR I = 3 TO {#blank#}1{#/blank#}
F=0
FOR J= 2 TO I-1
IF {#blank#}2{#/blank#} THEN
F=1
EXIT FOR
END IF
NEXT J
IF F=0 THEN {#blank#}3{#/blank#}
{#blank#}4{#/blank#}
END SUB
试题篮