下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是：____________________ 。PrivateSubComman_刷题宝

题干

下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是：____________________ 。
Private Sub Command1 Click
Dim x As Integer, m As Integer
m = 3
For x = 1 To 5
If m > 3 Then m = m + 2 Else m = m - 1
Next x
Text1.Text = Str(m)
End Sub

上一题下一题 0.99难度填空题更新时间:2019-05-24 11:38:25

答案(点此获取答案解析）

同类题1

现有如下Visual Basic程序段：

S = 0

For I = _____ to 3 step -1

Next I

该程序段运行后，语句S = S + i共执行了4次，则下划线处应是（）

同类题2

某对分查找算法的 VB 程序段如下：
i= 1 : j= 8 : t= 0 key=Int(Rnd()*7)+14
Do While i<=j
m=Int((i+j)/2)
t=t+1
if a(m)=key Then Exit Do
else
If a(m)>key Then j=m-1
Else

i=m+1 End if

End if
Loop
数组元素 a(1)到 a(8)的值依次为“2,11,14,15,18,19,20,22”，该程序段运行结束后，变量 t 的最大值可能是（）

同类题3

有如下VB程序段：
a(1)=58：a(2)=38：a(3)=46：a(4)=40：a(5)=58
a(6)=30：a(7)=48：a(8)=50：a(9)=36：a(10)=56
For i=1 To 10
b(a(i) Mod 10)=b(a(i) Mod 10)+1
Next i
s=""
For i=0 To 9
If b(i)>0 Then s=s+""+Str(i)+"："+Str(b(i))
Next i
数组b各元素初值为0，执行该程序段，s的值是

A．0：3 6：3 8：4	B．8：4 6：3 0：3
C．5：4 4：3 3：4	D．3：4 4：3 5：4：

同类题4

把学生成绩由高到低排序后，按姓名在前、成绩在后的顺序依次存储在数组a中。例如（“张三”“97” “李四”“92” “王五”“87”，……）。设计一个VB程序，利用对分查找思想实现在数组a中查找成绩为Key的学生姓名。程序段如下：
i=1:j=n 'n代表学生的数量
Key=Val(Text1.Text)
Do While i<=j
m=

If Val(a(m))>Key Then i=m\2+1 Else j=m\2-1
Loop
List1.Clear
j=j+1
Do While i<=n

If Val(a(2*j))=Key Then List1.AddItem a(2*j-1)+""十a(2*j)

Else exit do

j=j+1

Loop
上述程序中方框处可能的语句是（）

C．((i+j)12)*2

D．((i+j)\2)/2

同类题5

有如下VB程序段:
Dim a(1 To 5) As Integer
Pos=-1
i=1
Do While i<=10
If i Mod 2=0 Then a(i)=i*2 Else a(i)=i
i=i+1
Loop
i=10
Do While i>=1
If a(i)=12 Then Pos=i
i=i-1
Loop
该程序段运行后,变量Pos值是( )

相关知识点