网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下列的程序段执行后，x的值为______。Private Sub Command1_Ciick() x =0 for i =1 To 10 for j = i To 10 x=x+1 Next j Next i Print xEnd Sub
A．50
B．55
C．5
D．105
参考答案
更多 “ 下列的程序段执行后，x的值为______。Private Sub Command1_Ciick() x =0 for i =1 To 10 for j = i To 10 x=x+1 Next j Next i Print xEnd SubA．50B．55C．5D．105 ” 相关考题
考题
阅读下列的程序段：sum＝0for i＝1 to 3for i＝i to 4for k＝j to 5sum＝sum+1next knext jnext I执行上面的三重循环后，sum的值为______。
考题
有以下程序：Private Sub Form_Activate()For j=1 to 3x=3For i=l to 2x=x+6NextNextPrint xEnd Sub程序运行后，窗体上显示的结果为______。
考题
执行以下程序段Dim i As Integer, x As Integerx = 0For i = 20 To 1 Step -2x = x + i \ 5NextPrint x后，x的值为（ ）。A．16B．17C．18D．19
考题
阅读下列程序段：x = 0For i = 1 To 4For j = 1 To ix = x + 1Next j, i执行以上循环后，x 的值为( )。A、 6B、 9C、 10D、 16
考题
阅读下面的程序段：a=0For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的程序段后，a的值为A．3B．9C．14D．21
考题
执行下面的程序段，x的值为 。private Sub Command1_Click()For i=1 To 5 a=a+iNext iX=Val(i)msgBox xEnd SubA．5 B．6 C．7 D．8
考题
下列程序的执行后,X的结果为()。 Private Sub Command1_Click( ) x=0 For i=1 to 3 x=1 For j=1 to 4 x=2 For k=1 to 5 x = x ＋ 2 Next k Next j Next i Print x End Sub
A. 12B. 24C. 36D. 48
考题
有以下程序：Private Sub Form_Activate()For j=1 to 3x=3For i=1 to 2x=x+6NextNextPrint xEnd Sub程序运行后，窗体上显示的结果为______。
考题
下面程序段运行后，变量X的值为【 】。Dim x AS IntegerDim I AS Integerx＝0for I＝0 to 50 step 10X＝X＋I。next IPrint X
考题
下面程序段的运行结果是【 】。Option Base 1Private Sub Swap (a() As IntegFor I=1 to 10\2t=a(I)a(I)=a(10-I+1)a(10-I+1)=tNext IEnd SubPrivate Sub Form_Click()Dim x(10) As IntegerFor I=1 to 10x(I)=I*2Next ISwap x()For I=1 to 10Print x(I)Next IEnd Sub
考题
阅读下面的程序段：a==0For i=1 To 3For j=1 To iFor k=j To 3a=a+lNext kNext jNext i执行上面的程序段后，a的值为（ ）。A.3B.9C.14D.21
考题
有如下程序：Private Sub Command1_Click()j =10For i= -1 To 1 Step 0.3j =j + 1Next iPrint jEnd Sub该程序共循环【 】次，程序执行完毕后j的值是【 】。
考题
以下能够正确计算n!的程序是A．Private Sub Command1 Click() n=5：x=1 Do x=x * I I=I + 1 Loop While I ＜ n Print x End SubB．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X*I I=I + 1 Loop While I ＜n Print x End SubC．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X * I I=I + 1 Loop While I＜=n Print X End SubD．Private Sub Command1_Click() n=5：X=1：I=1 Do x=x * I I=I + 1 Loop While I＞n Print X End Sub
考题
下列的程序段执行后，X的值为______。 K=0 For i=1 To 10 For j=i To 10 x= x + 1 Next j Next iA．50B．55C．100D．105
考题
阅读下面的程序： 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
考题
执行下面的程序段，x的值为 Private Sub Commandl_Click() For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End SubA．5B．6C．7D．8
考题
执行以下程序段Dim x As Integer，i As Integerx＝0For i=20 To 1 Step-2 x＝x+i\5Next i后,x的值为A．16B．17C．18D．19
考题
以下能够正确计算n! 的程序是( )。A．Private Sub Command1_Click( ) n=5:x=l Do x=x*i i=i+1 Loop While i ＜ n Print x End SubB．Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i ＜ n Print x End SubC．Private Sub Command1_Cliek( ) n:5:x=1:i=1 Do x=x* i i:i+1 Loop While i ＜ = n Print x End SubD．Private Sub Command1_Cliek( ) n=5:x:1:i=1 Do x=x*i i=j+1 Loop While i ＞ n Print x End Sub
考题
下列程序用于输出一个主对角线上元素值为“*”，其他元素值为“”的5×5阶的方阵，试将程序补充完整。Private Sub Command1_Click()Dim x(5, 5)For i = 1 To 5For j = 1 To 5If ______Thenx(i, j) = '*'Else______End IfPrint ______Next jPrintNext iEnd Sub
考题
以下能够正确计算n!的程序是______。A．Private Sub Commeadl_Click() n=5: x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop Whilei＜=n Print x End SubD．Private Sub Commsndl_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
考题
执行下面的程序段，x的值为 Private Sub Command1_Click( ) For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End SubA．5B．6C．7D．8
考题
下列程序运行后的输出结果是______。Private Sub f(k，s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i，s)Sum=Sum+sNextPrint SumEnd Sub
热门标签
最新试卷