题目内容

窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() For i = 1 To 4 For j = 4 To 8 Sum = Sum + 1 Next j Next i Print Sum End Sub 运行时,单击按钮,输出结果是(

A. 4
B. 8
C. 20
D. 32

查看答案

搜索结果不匹配？点我反馈

更多问题

有如下事件过程：Private Sub Command1_Click()Dim check, countercheck = Truecounter = 0DoDo While counter<20counter = counter + 1If counter=10 Thencheck = FalseExit DoEnd ifLoopLoop Until check = FalsePrint counter,checkEnd Sub程序运行后，输出的结果为（）

A. 15 0
B. 20 -1
C. 10 True
D. 10 False

执行下列程序段后输出的结果是( )。 s = 1 For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s; Next i

A. 1 2
B. 2 1
C. 2 2 12
D. 1 2 12

有如下事件过程：Private Sub Command1_Click()a=0For i = 1 To 3For j = 1 To iFor k = j To 3a = a + 1Next kNext jNext iPrint aEnd Sub程序运行后，输出的结果为（）

A. 12
B. 14
C. 15
D. 16

如下程序段的功能是计算 1/2+1/4+1/6 +...+1/50,并显示结果。 Private Sub Command1_Click() Dim i As Integer Dim sum As Double i = 2 sum = 0 Do While (i <= 【1】) sum = sum + 1 / 【2】 i = i + 2 Loop Print sum End Sub 程序的空缺处【1】和【2】应分别填写(

A. 50, sum
B. 50, i
C. 100, sum
D. 100, i