试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省高中信息技术 算法及VB语言基础单元检测
x=Text1.Text
p=0
For i=1 to Len(x)
If Mid(x,i,1)=“a” Then p=p+1
Next i
Print p
若程序运行时,在文本框Text1中键入“Are you happy”,则运行结果是( )
Private sub Command_Click()
Msgbox(“123”+”456”)
End sub
运行时,在输出对话框中显示的提示信息是( )
a(1) = 1
For i = 2 To 12
a(i) = a(i - 1) + Int(Rnd * 2) + 1
Key = Val(Text1.Text)
i = 1: j = 12: cnt = 1: flag = False
Do While i <= j And flag = False
cnt = cnt + 1
m = (i + j + 1) \ 2
If a(m) = Key Then
flag = True
ElseIf Key > a(m) Then
i = m + 1
Else
j = m - 1
End If
Loop
程序运行后,下列说法正确的是( )
For k = 100 To 500
x = k
z = 0
Do while x > 0
If z= k Then
List1.AddItem Str(k)
End lf
Next k
上述程序段中方框处可选语句为:( )
①x =x\ 10 ②y = x Mod 10 ③z = z+10* y ④z= 10* z + y
则(1)(2)(3)处语句依次为
试题篮