试题 试卷
题型：单选题 题类：模拟题 难易度：普通
浙江省普通高校招生信息技术选考模拟卷（四）
Dim a(1 To 1 000)As String
Dim b(1 To 2)As Integer
N=Len(Text1．Text)
For i=1 To n
a(i)=Mid(Text1．Text，i，1)
Next i
DO While n>l
If ASC(a(n))>=Asc(a(n-1))Then
m=1
Else
m=2
End If
b(m)=b(m)+1
n=n-1
Loop
数组b各元素的初始值都为0，文本框Text1的内容为“2018Python”。执行程序后，变量b(1)的值为（ ）
PRIVATE SUB FORM__CLICK( )
S=0
FOR A = 1 TO 5
FOR B= 1 TO 3
S=S+1
NEXT B
NEXT A
PRINT S
END SUB
试题篮
