在窗体中有一个命令按钮Command1和一个文本框Text1，事件代码如下： Private Sub Command1_Click（) For i = l To 4 x = 3 For j = 1 To 3 For k = 1 To 2 x = x + 3 Next k Next j Next i Text1.value = Str（x) End Sub 打开窗体运行后，单击命令按钮，文本框Text1输出的结果是______。A．6B．12C．18D．21
在窗体中有一个命令按钮Command1和一个文本框Text1，事件代码如下： Private Sub Command1_Click（) For i = l To 4 x = 3 For j = 1 To 3 For k = 1 To 2 x = x + 3 Next k Next j Next i Text1.value = Str（x) End Sub 打开窗体运行后，单击命令按钮，文本框Text1输出的结果是______。
A．6
B．12
C．18
D．21
参考答案和解析
D 解析：此题为3层嵌套循环，经过分析可见l的最外层循环没有实际意义，I值从l到4时，x的结果是一样的。当j=1，k=l时，x=x+3=6，next k，这时k=2，x=6+3=9；最内层循环执行完毕，执行第二层循环，即j=2，重复上面步骤，以此类推到j=3，最终x值为21。
相关考题：
（ 33 ）在窗体中有一个命令按钮 command1 和一个文本框 text1, 编写事件代码如下：Private sub command1_click()For i=1 to 4X=3For j=1 to 3For k=1 to 2X=x+3Next kNext jNext iText1.value=str(x)End sub打开窗体运行后，单击命令按钮，文本框 text1 输出的结果是A ） 6B ） 12C ） 18D ） 21
（ 31 ）在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ，编写事件代码如下：Private Sub Command1_Click()Dim i,j,xFor i = 1 To 20 step 2x = 0For j = To 20 step 3x = x + 1Next jNext iTextl.Value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是A ） 1B ） 7C ） 17D ） 400
在窗体上添加一个命令按钮（名为Command1），然后编写如下事件过程：Private Sub Command1_Click（）For i=1 To 4x=4For j=1 To 3x=3For k=1 To2x=x+6Next kNext jNext iMsgBox xEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是A．7B．15C．157D．538
在窗体中有一个命令按钮Command1和一个文本框Test1，编写事件代码如下： Private Sub Command1_Click() For I=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next I Text1.Value=Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框Text1中输出的结果是( )。A．6B．12C．18D．21
在窗体中画一个命令按钮，然后编写以下时间过程： Private Sub Command1_Click() For i=1 To 4 x=1 For j=1 To 3 x=2 For k=1 To 2 x= x+6 Next k Next j Next i Print x End Sub程序运行后，单击命令按钮，输出结果是______。A．2B．7C．14D．37
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private SuB cormmandl_Click()Dim i,j,xFor i=i To 20 step 2x=0For j=1 To 20 step 2x=x+1Next jNext iText1.Value=Str(x)End SuB打开窗体运行后，单击命令按钮，文本框中显示的结果是A．1B．7C．17D．400
阅读下面的程序： Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，窗体上输出的结果是A．3B．9C．14D．21
在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下： Private Sub Command1_Click() Dim i，j，x For i=1 To 20 Step 2 x=0 For j-i To 20 Step 3 x=x+1 Next j Next i Text1.Value=Str(x) End Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是( )。A．1B．7C．17D．400
在窗体上添加有一个命令按钮，(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next I MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是 ______。A．7B．15C．157D．538
在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)A．3B．6C．9D．12
在窗体上添加一个命令按钮，名为Command1，一个文本框，名为text1，则执行如下事件过程后，文本框中的输出为 For i=1 To 3 For j=1 To 3 For k=1 To 2 x=x+3 Next k,j,i Text1.Text=str(x)A．21B．42C．54D．72
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写 如下事件过程： Private Sub Command1_Click() Dim arrayl(10，10)As Integer Dim i， j As Integer For i=1 To 3 For j=2 To 4 arrayl(i，j)=i + j Next j Next i Text1.Text=arrayl(2， 3)+arrayl(3， 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是A．12B．13C．14D．15
在窗体上画一个名称为CoilTlilandl的命令按钮，然后编写如下事件过程： Private Sub command1 Click() Dim m As Integer， i As Integer， x(3)As Integer For i=0 To 3：x(i)=i：Next i For i = 1 To 2： Call sub1(x，i)：Next i For i = 0 To 3： Print x(i)；： Next i End Sub Private Sub sub1(a()As Integer，k As Integer) Dim i As Integer Do a(k)=a(k)+a(k+1) j = j + 1 Loop While j ＜ 2 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．0 3 7 5B．0 1 2 3C．3 2 4 5D．0 5 8 3
在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：Private Sub Command1_Click()For I=1 To 4X=3For j=i To 3For k=1 To 2X=x+3Next kNext jNext IText]．value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框Text1输出的结果是A．6B．12C．18D．21
窗体有命令按钮Commandl和文本框Text1，对应的事件代码如下：Private Sub Commandl Click（ ） For i=1T04X==3 For i=1t03 For k=1T02 x=x+3 Next k Next j Next i Text1．Value=Str(x) End Sub 运行以上事件过程，文本框中的输出是（ ）。A.6B.12C.18D.21
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下： Private Sub Commandl一Click（ ）Dim i，j，X For i=1 TO 20 step 2 X=0 For j=i TO 20 step 3 X=X+1 Next j Next i．Textl．Value=Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框中显示的结果是（ ）。A.1B.7C.17D.400
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，则执行如下事件过程后，文本框中的输出为______。private Sub Command1_ click() for i = 1 To 4 for j = 1 To 3 x = 3 for K = 1 To 2 x=x+3 Next K Next j Next i Text1.Text= Str(x)End SubA．3B．6C．9D．12
在窗体上画一个命令按钮，然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮,输出结果是______ 。A．7B．15C．157D．538
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For i =1 To 4 x=4 For j = 1 To 3 x=3 For k = 1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是A．7B．15C．157D．538
在窗体中添加一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) For i=l To 4 x=4 For j=1 To 3 x=3 For k=l To 3 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，输出结果是A．7B．15C．21D．538
在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下： Private Sub Command1_Click(． For I =1 To 4 x = 3 For j = 1 To 3 For k = 1 To 2 x = x + 3 Next k Next j Next I Text1.value = Str(x． End Sub 打开窗体运行后，单击命令按钮，文本框Text1输出的结果是A.6B.12C.18D.21
在窗体中有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private Sub Commandl—Click（ ） For i=1 T04 X=3 For j=1 T03 For k=1 T02 x=x+3 Next k Next jNext iText1．Value=Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框Text1中输出的结果是（ ）。A.6B.12C.18D.21
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private Sub Commandl一Click（ ）Dim i，j，XFor i=1 TO 20 step 2X=0For j=i TO 20 step 3X=X+1Next jNext i．Textl．Value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是（ ）。A.1B.7C.17D.400
在窗体上添加一个命令按钮，名为 command1，一文本框，名为text1，则执行如下事件过程后，文本框中的输出为______。 For i = 1 To 3 For j = 1 To 3 For k = 1 To 2 x=x+ 3 Next k Next j Next i TextText =str (x)A． 21B．42C．54D．72
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 2 X=x+6 Next Next Print x End Sub 程序运行后，单击命令按钮，输出结果是A．12B．13C．16D．17
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是______。A．3B．4C．5D．6
在窗体上添加按钮cmd，并编写如下事件代码： Private sub crud_Click( ) For i=1 to4 x=4 For j=1 to 3 x=3 For k=1 to 2 x=x+6 Next k Next j Next i Msgbox x End sub 打开窗体，单击按钮后，消息框中显示的信息为( )。A．7B．15C．157D．538
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=l To 4 x=4 For j=1 To 3 x=3 Fork=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是( )。A．7B．15C．157D．528