试题 试卷
题型：单选题 题类：常考题 难易度：普通
计算机解决问题的过程
I=0
P=0
DO WHILE P<10
P=P+I
I=I+2
LOOP
PRINT P
Private Sub Command1_click()
Dim s as integer,I as integer
S=0
For i=1 to 20 step 3
s=s+(-1)^i*i
Next i
Label1.caption=str(i)
Label2.caption=str(s)
End Sub
a = 5
b = Len("1011")
If a > b Then
Label1.Caption = "请重新输入"
Else
Label1.Caption = "欢迎光临"
End If
该程序段运行后，在标签Label1上显示的是{#blank#}1{#/blank#}。
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”，则运行结果是（ ）
试题篮
