内容发布更新时间 : 2024/5/5 15:57:23星期一 下面是文章的全部内容请认真阅读。

Access数据库应用技术

参考答案A

197 在已建窗体中有一命令按钮(名为Commandl)，该按钮的单击事件对应的VBA代码为： Private Sub Commandl_Click()

subT.Form.RecordSource = \雇员\ End Sub

单击该按钮实现的功能是

A 使用select命令查找“雇员”表中的所有记录 B 使用select命令查找并显示“雇员”表中的所有记录 C 将subT窗体的数据来源设置为一个字符串 D 将subT窗体的数据来源设置为“雇员”表 参考答案D

200 下列属于通知或警告用户的命令是 A PrintOut B OutputTo C MsgBox D RunWarnings 参考答案C

202 如果X是一个正的实数，保留两位小数、将千分位四舍五入的表达式是 A 0.01*Int(x+0.05) B 0.01*Int(100*(X+0.005)) C 0.01*Int(x+0.005) D 0.01*Int(100*(X+0.05)) 参考答案B

203 在模块的声明部分使用“Option Base 1”语句，然后定义二维数组A(2 to 5,5)，则该数组的元素个数为 A 20 B 24 C 25 D 36 参考答案A

204 由“For i=1 To 9 Step -3”决定的循环结构，其循环体将被执行 A 0次 B 1次 C 4次 D 5次 参考答案B

206 在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Commandl_Click() Dim y As Integer y = 0 Do

y = InputBox(\

If (y Mod 10) + Int(y / 10) = 10 Then Debug.Print y; Loop Until y = 0 End Sub

打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是 A 37 55 64 28 19 19 B 10 50 20 C 10 50 20 0 D 37 55 64 28 19 参考答案D

207 在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Debug.Print x; y End Sub

Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub

打开窗体运行后，单击命令按钮，立即窗口上输出的结果是

33

Access数据库应用技术

A 2 32 B 12 3 C 2 2 D 12 32 参考答案A

208 在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Commandl_Click() Dim d1 As Date Dim d2 As Date dl = #12/25/2009# d2 = #1/5/2010#

MsgBox DateDiff(” ww”, d1, d2) End Sub

打开窗体运行后，单击命令按钮，消息框中输出的结果是 A 1 B 2 C 10 D 11 参考答案B

233 因修改文本框中的数据而触发的事件是 A Change B Edit C Getfocus D LostFocus 参考答案A

235 要将一个数字字符串转换成对应的数值，应使用的函数是 A Val B Single C Asc D Space 参考答案A

236 下列变量名中，合法的是 A 4A B A-1 C ABC_1 D private 参考答案C

237 若变量i的初值为8,则下列循环语句中循环体的执行次数为 Do While i<=17 i=i+2 Loop

A 3次 B 4次 C 5次 D 6次 参考答案C 245 已知程序段： s＝0

For I=1 to 10 Step 2 S=s＋1 I=I*2 Next I

当循环结束后，变量I和s的值为（ ）。 A 10,1 B 11,2 C 22,3 D 16,3 参考答案C

250 已定义好有参函数（fm），其中形参m是整型变量。下面调用该函数，传递实参为5，将返回的函数值赋值给变量t。以下正确的是（A t=f（m） B t＝Call f（m） C t＝f（5） D t＝Call f（5） 参考答案C

253 VBA的逻辑值进行算术运算时，True值被当做（ ）。 A 0 B -1 C 1 D 任意值 参考答案B

257 返回给定日期l－7的值。表示给定日期是一周中的哪一天的函数为（ ）。 A Weekday（date） B Hour（date） C Date（） D Sum 参考答案A

263 VBA数据类型符号”％”表示的数据类型是（ ） A 整数 B 长整数 C 单精度数 D 双精度数

34

）。 Access数据库应用技术

参考答案A

264 从字符串S（”abcdefg“）中返回子串B（”cd“）的正确表达式为（ ）。 A Mid（S,3,2） B Right（Left（S,4）,2） C Left（Right（S,5）,2） D 以上都可以 参考答案D

268 字符函数Rtrim(字符表达式)返回值是去掉字符表达式（ ）的字符串。 A 前导空格 B 中间空格 C 两端空格 D 尾部空格 参考答案D

274 以下有关优先级的比较，正确的是（ ）。 A 算术运算符＞关系运算符＞连接运算符 B 算术运算符＞连接运算符＞逻辑运算符 C 连接运算符＞算术运算符＞关系运算符 D 逻辑运算符＞关系运算符＞算术运算符 参考答案B

275 以下哪个选项定义了10个整型数构成的数组，数组元素为 NewArray（l）至 NewArray（l0）。（ ）。 A Dim NewArray(10) As Integer B Dim NewArray(1 to 10) As Integer C Dim NewArray(10) Integer D Dim NewArray(1 to 10) Integer 参考答案B

279 以下将变量 NewVar定义为 Interger型正确的是（ ）。 A Interger mewVar B Dim NewVar Of Integer C Dim NewVar As Integer D Dim Interger NewVar 参考答案C

281 能够实现从指定记录集里检索特定字段值的函数是（ ） A Nz B Dsum C Dlookup D Rnd 参考答案C

282 以下关于变量的叙述错误的是（ ）。

A 变量名的命名同字段命名一样，但变量命名不能包含有空格或除了下划线符号外的任何其他的标点符号 B 变量名不能使用VBA的关键字

C VBA中对变量名的大小写敏感，变量名“Newyear”和“newyear”代表的是两个不同的变量 D 根据变量直接定义与否，将变量划分为隐含型变量和显式变量 参考答案C

283 在“NewVar=528”语句中，变量NewVar的类型默认为（ ）。 A Boolean B Variant C Double D Integer 参考答案B

284 在模块中执行宏“macro1”的格式为是（ ）。 A Functio.RunMacro B DoCmd.RunMacro C Sub.RunMacro macro D RunMacro macro 参考答案B

285 以下关于标准模块的说法不正确的是（ ）。

A 窗体模块和报表模块属于类模块，它们从属与各自的窗体或报表

B 窗体模块和报表模块具有局部特性，其作用范围局限在所属窗体或报表内部 C 窗体模块和报表模块中的过程可以调用标准模块中已经定义好的过程 D 窗口模块和报表模块生命周期是伴随着应用程序的打开而开始、关闭结束 参考答案C？？ 295 程序段：

For S＝5 TO S＝10 Step 1

35

Access数据库应用技术

S＝2*S Next S

该循环执行的次数为（ ）。 A 1 B 2 C 3 D 4 参考答案A

329 要显示格式为“页码/总页数”的页码，应当设置文本框的控件来源属性值为（ ） A ［Page］/［Pages］ B ＝［Page］/［Pages］

C ［Page］& ＂／＂ ＆［Pages］ D ＝［Page］＆”／”＆［Pages］ 参考答案D

362 函数Right(Left（Mid(“Access DataBase”,1O,3),2）,l)返回的值是（ ） A t B at C a D B 参考答案C

372 VBA表达式DateSerial返回的值的类型是（ ） A 整数 B 长整数 C 日期/时间 D 布尔型 参考答案C 384 Dim I As Integer I＝Int（-3.25） I的返回值是（ ）。 A -3 B -4 C 3 D 3.25 参考答案B

385 VBA中定义局部变量可以用关键字（ ） A Const B Dim C Public D Static 参考答案B 387 程序段： Dim M As Single Dim N As Single Dim P As Single M＝Abs（-7） N＝Int（-2.4） P＝M+N

P的返回值是（ ）。 A 9 B -9 C 5 D 4 参考答案D

389 VBA表达式IIf（0，20，30）的值为（ ） A 20 B 30 C 25 D 10 参考答案B 390 程序段： D＝＃2004-8-1＃ T＝＃12：08：20＃ MM＝Month（D） ss＝Second（T） MM的返回值是（ ）。 A 2004 B 8 C 1 D 38200 参考答案B 392 程序段： str1＝\str2＝\计算机等级考试\str3＝Right（str1,3）

36