试题 试卷
题型:填空题 题类:常考题 难易度:普通
运算符与表达式
s=text1.text
For i=1 to len(s)
c=mid(s,i,1)
If c>=″a″ and c<=″z″ then
n=asc(c)-asc(“a”)+1
zm(n)=zm(n)+1
End if
Next i
已知数组zm中各元素初值均为0,若文本框text1中输入的内容是“One world, one dream”,执行该程序段后,zm(15)的值是( )
Dim i As Integer, s As String
i = 0
Do While i < 5
s = Str(i) + s
i = i + 1
Loop
试题篮