Ta老师题库

有如下程序:Option Base 1Private Sub Form. Click()Dim arr,SumSum=0alt=Array(1,3,5,7,9,11,13

12 查阅

有如下程序： Option Base 1 Private Sub Form. Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。

A． 25

B．26

C．27

D．28

参考答案:

C解析：Option Base 1表示数组的下标是从1开始的。本题中先定义arr=Array(1,3,5,7,9,11,13,15,17,19)，即a(1)=1,a(2)=3,a(3)=5,a(4)=7,a(5)=9,a(6)=11,a(7)=13,a(8)=15,a(9)-17,a(10)=19，而在循环语句中就是要求把能被3整除的数加起来，即4(2)+a(5)+a(8)=3+9+15=27。

计算机二级

相关问题:

在窗体画一个命令按钮,然后编写如下事件过程:Private Sub Commandl Cli

设窗体上有一个名为Text1的文本框,并编写如下程序:Private Sub Form_Lo

假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,

假定通用对话框的名称为CommonDialogl,命令按钮的名称为Commandl,则单

如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是______。

为窗体中的命令按钮设置单击鼠标时发生的动作,应选择设置其属性对话框

要改变窗体上文本框控件的数据源,应设置的属性是()。

打开数据库的“页”对象列表,单击对象后再单击“设计”按钮,属于()。

随便看看:

版权所有,保留一切权利！© 2018-2023 Ta老师 Talaoshi.com 湘ICP备18019507号-1 联系QQ:469958。