在窗体上画一个命令按钮,然后编写如下事件过程: 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

在窗体上画一个命令按钮,然后编写如下事件过程: 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.12

B.13

C.16

D.17


相关考题:

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click()Dim aa= Array(1,2,3,4,5)For i=1 To UBound(a)a(i)= a(i)+i-1NextPrint a(3)End Sub程序运行后,单击命令按钮,则在窗体上显示的内容是( )。A.4B.5C.6D.7

在窗体上画一个名称为 \Command1\ 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As StringA="123456789"For i=1 To 5Print Space(6-i);Mid $ (a,______ ,2*i-1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮,则窗体上显示的内容是______。A.5B.120C.153D.160

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer, x As IntegerFor i = 1 To 6If i = 1 Then x = iIf i = 4 Thenx = x + 1Elsex = x + 2End IfNext iPrint xEnd Sub程序运行后,单击命令按钮,其输出结果为( )。A.9B.6C.12D.15

在窗体上画尸-个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() For i=1 to 4 If i=1 Then x=i If i<=4 Then x=x+1 Print x Next i End Sub 程序运行后,单击命令按钮,其输出结果为: ______。A.1 2 3 4B.2 3 4 5C.2 3 4 4D.3 4 5 6

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(5) As StringFor i = 1 To 5a(i) = Chr(Asc("A") + (i - 1))Next iFor Each b In aPrint b;NextEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.ABCDEB.1 2 3 4 5C.abcdeD.出错信息

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 2x=x+6NextNextPrint xEnd Sub程序运行后,单击命令按钮,输出结果是A.12B.13C.16D.17

在窗体上画一外名称Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )x=0n=InputBox(" ")For i = 1 To nFor j = 1 To ix=x+1Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是【 】。

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a=0For i=1 To 3For j=1 To 4If j Mod 2<>0 Thena=a+1End Ifa=a+1Next jNext iPrint aEnd Sub程序执行后,单击命令按钮,输出结果是【 】。

在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x < n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.5B.6C.8D.11

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i,A)Next i x = i + 2 Print x;a End Sub Private Sub fun1(n,m) m=m + n * 2 n = n + m End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.1 5B.4 5C.8 4D.3 4

在窗体上画一个命令按钮(其名称为Conlmand1),然后编写如下事件过程:Private Sub Command1_Click() For i=1 To 4 If i=1 Then x=i If i<=4 Then x=x+1 Print x Next iEnd Sub 程序运行后,单击命令按钮,其输出结果为______。A.1 2 3 4B.2 3 4 5C.2 3 4 4D.3 4 5 6

假定有如下的Sub过程: Sub S(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a,b Print a,b End Sub 程序运行后,单击命令按钮,输出结果为 ______ 。A.5 4B.1 1C.1.25 4D.1.25 1

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x = 0 n=InputBox(" ") For i = 1 To n For j=1 To i x = x + 1 Next i Next i Print x End Sub 程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是A.3B.4C.5D.6

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 3X=3For k=1 To 2x=x+6NextNextNextPrint xEnd Sub 程序运行后,单击命令按钮,输出的结果是A.7B.15C.157D.538

假定有如下的Sub过程:Sub Sub1(x As Single,y As single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_click()Dim a As SingleDim b As Singlea=5b=4Sub1 a,bPrint a;bEnd Sub程序运行后,单击命令按钮,输出结果为A.B.C.D.

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,yEnd Sub程序运行后,连续三次单击Command1按钮后,窗体上显示的是A.4 2B.12 18C.12 30D.4 6

在窗体上画一个命令按钮,然后编写如下事件过程: 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

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1 Click() For i=1 To 4 If i=1 Then x=i If i<=4 Then x=X+1 Print x Next i End Sub 程序运行后,单击命令按钮,其输出结果为:_______。A.1 2 3 4B.2 3 4 5C.2 3 4 4D.3 4 5 6

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n : 4 TO 0 Step -1 x(n)= n + 1 Print x(n); Next n End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.54321B.4C.54321D.0

在窗体上画一个名称为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

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) For i=1 To UBound(a)a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.4B.5C.6D.7

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。A.ABCDEB.1 2 3 4 5C.abodeD.出错信息

编写如下通用过程: Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click () Dim a As Single Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 程序运行后,如果单击命令按钮,则输出结果为A.5 4B.1.25 1C.4 5D.1.25 5

在窗体上画一个名称为Comillarldl的命令按钮,然后编写如下事件过程: 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

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Then y = Sgn(x ^ 2)Else y = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.-5B.25C.1D.-1