试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙教版高一信息技术 专题五:VB程序设计
s="ABC123":i=1
Do While i<=6
ch=Mid(s,i,1)
If ch>="0" And ch<="9" Then c=c+1
i=i+1
Loop
Dim x As String, y As String
Dim ans As Integer
x=“5”:y=“20”:ans=0
If x>y Then ans=Val(x)Else ans=Val(y)
ans=ans+Val(x+y)
Text1.Text=Str(ans)
程序运行完后,文本框Text1中显示的是:( )
执行该流程图后,输出b的结果是( )
For i= 1 To 8
a(i) =Int(Rnd*2)
Next i
sum= 0
For i=1 To 8 Step 3
For j=i To 8
a(j)=1-a(j)
Next j
sum=sum+a(i)
Text 1.Text=Str(sum)
执行该程序段后,文本框Text 1中显示的内容不可能是( )
试题篮