中国大学MOOC: 若有如下循环，程序执行后显示______次MsgBox。Dim s%Do While s<=3 s=s+1 MsgBox(s)Loop
举一反三
- 以下代码执行完毕后，显示的s的值为。 s=9 If s Mod 2=0 Then s=s+1 s=s*2 Else s=s+2 s=s/2 End If MsgBox s
- 中国大学MOOC: 下面代码执行后，变量s的值为______。 Dim i, n As Integer, s As String i = 2 : n = 12 : s = n & = Do Until n = 1 Do While n Mod i = 0 s &= i & * n = n i Loop i += 1 Loop s = Strings.Left(s, Len(s) - 1)
- 窗体上有一个命令按钮Command1,其Click事件过程如下: Private<br/>Sub Command1_Click() Dim s As Integer s=2 Do While s< 8 s=s + 2 Loop MsgBox sEnd Sub 程序执行后单击命令按钮,则消息框的输出结果是____。 A: 6 B: 8 C: 10 D: 12
- 中国大学MOOC: 在窗体上添加一个命令按钮Command1，然后编写如下事件过程：Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a <= 0 Print s; aEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
- 下述程序段中，与其他3个程序段作用不同的是_______。 A: s=0 i=0 While i＞100 s=s+1 Wend B: s=0 i=0 While i＜100 i=i+1 Wend C: s=0 i=1 Do While i＜100 s=s+1 i=i+1 Loop D: s=0 i=0 Do Until i＞=100 s=s+1 i=i+1 Loop