程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub -题库考试答案搜索网

程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

单选题

2022-03-04 12:24

A、32
B、28
C、30
D、36

查看答案

正确答案

A

试题解析

解析：当发生Command1_click事件时，将定义一个4行4列的数组aa(数组下标从0开始)，然后通过一个两层For循环给它的各个元素赋值，赋值规律是给每一个元素赋它的行下标值乘以4，再加上列下标值再加1。然后通过一个For循环把数组元素aa(0，1)、aa(1，1)、aa(2，1)和aa(3，1)的值2、6、10、14加到s中，s的值为32。

标签：

感兴趣题目

为窗体上的控件设置Tab键顺序时，应设置控件属性表（）选项卡的“Tab键次序”选项。

下列程序段运行后窗体上输出结果为( )。 Private Sub Command1 Click() a=5：b=4：c=3：d=2 X=3＞2*b Or a=c And b＜＞C Or c＞d Print X End Sub

程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

程序运行后，如果单击命令按钮则，在窗体上显示的内容是（）.

程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）

在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
Dim x As Integer
x = Val(InputBox("请输入一个整数"))
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。

有下列程序： Private Sub Command1_Click() X$="Nanchang" y$="Beijing" z$="Nanjing" z$=InStr(Left(x$，3)+Right(y$，4)，z$) Print z$ End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

在窗体上添加一命令按钮，其名为Command1，然后编写代码如下： private Sub Command1_Click() Dim arr(5)As Integer，arr1(5)AS Integer n=3 For i=1 To 5 arr(i)=i arr1(n)=2*n+i Next Print arr1(n)；art(n) End Sub 程序的运行结果为

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(10)As Integer，arr2(10)As Integer n=3 For i=1 To 5 Arr1(i)=i arr2(n)=2*n+i Next i Print arr2(n)；Arr1(n) End Sub 程序运行后，单击命令按钮，输出结果是 ______。

设有如下程序： Private Sub Command1_Click（） Dim a Dim I As Integer a=Array（1，2，3，4，5，6，7，8，9） For I=0 To 3 Print a（5-I）； Next I End Sub 程序运行后，单击窗体，则在窗体上显示的是（）

在窗体上画一个名称为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 程序运行后。单击命令按钮，则窗体上显示的内容是______。

程序设计题目：（事件）单击窗体。（响应）求10~20之间所有素数的乘积并输出在窗体上。将结果存入变量L中。

相关题目: 在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：
OptionBase1
PrivateSubCommand1_Click（）
Dima
s=0
a=Array（1,2,3,4）;j=1
Fori=4To1Step-1
s=s+a（i）*j
j=j*10
Nexti
Prints
EndSub
运行上面的程序，单击命令按钮，其输出结果是（　　）。; 在窗体上有多个控件，要实现程序运行后焦点默认在某一控件上，应该设置的属性是（　　）。; 在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的（）设置为0; 在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s = 0 a = Array (1,2,3,4) j = 1 For i = 4 To 1 Step - 1 s = s + a (i) * j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是______; 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a <= 0 Print s; a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_____; 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是; 在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()Dim x As Integerx = Val(InputBox("请输入一个整数"))Print x + Text1TextEnd Sub程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。; 在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i=5 to 1 step -08Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为________。; 在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click() Dim x As Integer x = Val(InputBox("请输入一个整数")) Print x + Text1TextEnd Sub程序运行时，在文本框中输入12，然后单击窗体，在输入对话框中输入34，单击"确定"按钮后，在窗体上显示的内容为______。; 当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的（　　）。; 运行下列程序： Private Sub Form. Click() Sum=0 For i=1 To 100 If Mid(CStr(i)，1， 1)="1" Then Sum=Sum+1 End If Next i Print Sum End Sub 单击窗体后，在窗体上显示的结果是; 阅读下列程序： Private Sub Form Click() Dim i As Integer， sum As Integer For i = 2 To 10 If i Mod 2 ＜＞ 0 Then Print i； Else sum = sum + i End If Next i Print sum End Sub 程序运行后，单击窗体，在窗体上的输出结果是; 在窗体中添加一个名称为Cmd的命令按钮，然后编写如下程序： Public x As integer Private Sub Cmd_Click() x=10 Call add1 Call add2 MsgBox x End Sub Private Sub add1 ( ) x=x+20 End Sub Private Sub add2 ( ) Dim x As integer x=x+40 End Snb 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。; 在窗体窗口中，用鼠标双击窗体窗口的控件或窗体本身可以打开代码窗口。; 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件任务。; 一个窗体必须对应一个窗体模块，各种控件对象必须建立在窗体上。; 为窗体或报表上的控件设置属性值的宏操作是（）; 要在Form_Load事件过程中用Print方法在窗体上输出结果，应先调用窗体的（）方法。; 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command_Click( ) S=0 Do s=(s + 1) * (s +2) Number=Number+1 Loop Until S＞=30 Print Number，S End Sub 程序运行后，输出的结果是; 在窗体上画一个命令按钮，然后写出如下事件过程： Private Sub Command1 _ Click( ) S=1 Do S=(S + 1) ^(S + 2) Number=Number+1 Loop Until S＞=6 Print Number，S End Sub 程序运行后，输出的结果是

广告位招租WX:84302438

题库考试答案搜索网

免费的网站请分享给朋友吧