某同学编写了以下VisualBasic程序段，运行这段程序段，循环体的循环次数为：（）Dimx，yAsIntegerx=2y=20DoWhile x<_刷题宝

题干

某同学编写了以下Visual Basic 程序段，运行这段程序段，循环体的循环次数为：（）
Dim x，y As Integer
x=2
y=20
Do While x<y
x =x^2
Loop

A．4

B．3

C．2

D．0

上一题下一题 0.99难度选择题更新时间:2015-11-25 12:04:29

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

同类题1

为使左右框内的Visual Basic程序段实现相同的功能，可在左框内划线处填写的代码是：（）

同类题2

下面四个程序段运行后，变量a的值最小的是（）

同类题3

For i =" 1" To 4 step 1
If i Mod 2=" 0" Then s =" s" + (-1) ^ (i + 1) * 1 / i
Next i
MsgBox s*100
该程序的运行结果是（）

同类题4

下列VB程序运行时，在文本框Text1中输入2，单击命令按钮Command1后，文本框Text2的内容是________。
Private Sub Command1_Click()
Dim t As Single, h1 As Single, h2 As Single
Const g = 9.8
t = Val(Text1.Text)
h1 = (g * t ^ 2) / 2
h2 = Int(h1)
Text2.Text = Str(h2)
End Sub

同类题5

采用拉锯式排序法对无序数组元素实现降序排序，即前一遍把最大的元素从右到左送到最左的位置，后一遍把最小的元素是从左到右送到最右的位置，实现该功能的 VB 程序段如下：

c = 1: s = 10
Do While c <= s
For i = s To c + 1 Step -1
If

Then
t = a(i - 1): a(i - 1) = a(i): a(i) = t
End If
Next i
For i =

Then
t = a(i + 1): a(i + 1) = a(i): a(i) = t
End If
Next i
c = c + 1
s = s - 1
Loop
上述程序段三个方框处的语句分别为（）

A．① a(i - 1) < a(i) ② c +1 To s – c ③ a(i) <a(i + 1)

B．① a(i - 1) > a(i) ② c +2 To s – c ③ a(i) >a(i + 1)

C．① a(i - 1) < a(i) ② c +1 To s – c-1 ③ a(i) <a(i + 1)

D．① a(i - 1) > a(i) ② c+ 2 To s – c+1 ③ a(i) >a(i + 1)

相关知识点