1、国家二级（模块）机试模拟试卷 1及答案与解析 一、选择题 1 InputBox函数的返回值类型是 （ A）数值 （ B）字符串 （ C）变体 （ D）数值或字符串 (视输入的数据而定 ) 2 如下程序段定义了学生成绩的记录类型，由学号、姓名和三门课程成绩 (百分制 )组成。 Type Stud no As Integer name As String score(1 t0 3)As Single End Type 若对某个学生的各个 数据项进行赋值，下列程序段中正确的是 （ A） Dim S As Stud Stud no=1001 Stud name=”舒宜 ” Stud score=78，
2、 88， 96 （ B） Dim S As Stud S no=1001 S name=”舒宜 ” S score=78， 88， 96 （ C） Dim S As Stud Stud.no=1001 Stud.name=”舒宜 ” Stud.score(1)=78 Stud.score(2)=88 Stud.score(3)=96 （ D） Dim S As Stud S no=1001 S.name=”舒宜 ” S.score(1)=78 S.score(1)=96 S.score(1)=88 3 在窗体中有一个标签 Lbl和一个命令按钮 Commandl，事件代码如下： Option C
3、ompare Database Dim aAs String*10 Private Sub Command l_Click() a=”1234” b=Len(A Me.Lb 1.Coption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是 （ A） 4 （ B） 5 （ C） 10 （ D） 40 4 从字符串 S中的第 2个字符开始获得 4个字符的子字符串函数是 （ A） Mid$(s,2,4) （ B） Left$(s,2,4) （ C） Rigth(s,4) （ D） Left$(s,4) 5 语句 Dim NewArray(10)As Integer的含义是 （ A）
4、定义了一个整型变量且初值为 10 （ B）定义了 10个整数构成的数组 （ C）定义了 11个整数构成的数组 （ D）将数组的第 10元素设置为整型 6 表达式 Fix(-3.25)和 Fix(3.75)的结果分别是 （ A） -3,3 （ B） -4,3 （ C） -3,4 （ D） -,4 7 能够实现从指定记录 集里检索特定字段值的函数是 （ A） DCount （ B） DLookup （ C） DMax （ D） DSum 8 执行语句： MsgBox“A从 A“， vbOKCancel+vbQuestion， “BBBB“之后，弹出的信息框 （ A）标题为 “BBBB”、框内提示符
5、为 “晾叹号 ”、提示内容为 “AAAA” （ B）标题为 “AAAA”、框内提示符为 “惊叹号 ”、提示内容为 “BBBB” （ C）标题为 “BBBB”、框内提示符为 “问号 ”、提示内容为 “AAAA” （ D）标题为 “AAAA”、框内提示符为 “问号 ”、提示内容为 “BBBB” 9 窗体中有 3个命令按钮，分别命名为 Commandl、 Command2和 Command3。当单击 Commandl按钮时， Command2按钮变为可用， Command3按钮变为不可见。下列 Commandl的单击事件过程中，正确的是 （ A） Pfivme Sub Commandl Click(
6、) Command2.Vlsible=TRUe Command3.Visible=FalSe End Sub （ B） Pfivte Sub Commandl_Click() Command2.Enabled=True Command3.Enabled=False End Sub （ C） Private Sub Commandl_Click() Command2.Enabled=True Command3.Visible=False End Sub （ D） Private SUb Commandl_Click() Command2.Vsible=True Command3.Enabled=
7、False End Sub 10 用于获得字符串 S最左边 4个字符的函数是 （ A） Left(S,4) （ B） Left(S,1,4) （ C） Leftstr(S,4) （ D） Leftstr(S,0,4) 11 下列数据类型中，不属于 VBA的是 （ A）长整型 （ B）布尔型 （ C）变体型 （ D）指针型 12 下列数组声明语句中，正确的是 （ A） Dim A3,4As Integer （ B） Dim A(3,4)As Integer （ C） Dim A3;4As Integer （ D） Dim A(3;4)As Integer 13 在已建窗体中有一命令按钮 (名为
8、Commandl)，该按钮的单击事件对应的 VBA代码为： Private Sub Commandk_Click() subT.Form.RecordSource=“select*from雇员 “ End Sub 单击该按钮实现的功能是 （ A）使用 select命令查找 “雇员 ”表中的所有记录 （ B）使用 select命令查找并显示 “雇员 ”表中的所有记录 （ C）将 subT窗体的数据来源设置为一个字符串 （ D）将 subT窗体的数据来源设置为 “雇员 ”表 14 能够实现从指定记录集里检索特定字段值的函数是 （ A） N2 （ B） Find （ C） Lookup （ D） E
9、Lookup 15 如果 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 005) 16 在模块的声明部分使用 “OptionBasel”语句，然后定义二维数组 A(2 to 5,5)则该数组的元素个数为 （ A） 20 （ B） 24 （ C） 25 （ D） 36 17 在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Commandl Click()
10、Dim dl As Date Dim d2 As Date d1=#12 25 2009# d2=#1 5 2010# MsgBox DateDiff(“ww“， d1， dE) End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是 （ A） 1 （ B） 2 （ C） 10 （ D） 11 18 要将一个数字字符串转换成对应的数值，应使用的函数是 （ A） Val （ B） Single （ C） Asc （ D） Space 19 下列变量名中，合法的是 （ A） 4A （ B） A 1 （ C） ABC_1 （ D） private 20 下列表达式中，能正确表示条件 “
11、x和 y都是奇数 ”的是 （ A） x Mod 2=0 And y Mod 2=0 （ B） x Mod 2=0 or y Mod 2=0 （ C） x Mod 2=1 And y Mod 2=1 （ D） x Mod 2=1 or y Mod 2=1 21 下列给出的选项中，非法的变量名是 （ A） Sum （ B） Integer_2 （ C） Rem （ D） Forml 22 表达式 “B=INT(A+0 5)”的功能是 （ A）将变量 A保留小数点后 1位 （ B）将变量 A四舍五入取整 （ C）将变量 A保留小数点后 5位 （ D）舍去变量 A的小数部分 23 VBA语句 “Dim
12、 NewArray(10)as Integer”的含义是 （ A）定义 10个整型数构成的数组 NewArray （ B）定义 11个整型数构成的数组 NewArray （ C）定义 1个值为整型数的变量 NewArray(10) （ D）定义 1个值为 10的变量 NewArray 24 将一个数转换成相应字符串的函数是 （ A） Str （ B） String （ C） Asc （ D） Chr 25 VBA中定义符号常量使用的关键字是 （ A） Const （ B） Dim （ C） Public （ D） Static 26 可以用 InputBox函数产生 “输入对话框 ”。执行语句
13、： st=InputBox(“请输入字符串 “， “字符串对话框 “, “aaaa“) 当用户输入字符串 “bbbb”，按 OK按钮后，变量 st的内容是 （ A） aaaa （ B）请输入字符串 （ C）字 符串对话框 （ D） bbbb 27 下列不属于 VBA函数的是 （ A） Choose （ B） If （ C） IIf （ D） Switch 28 下列关于 VBA事件的叙述中，正确的是 （ A）触发相同的事件可以执行不同的事件过程 （ B）每个对象的事件都是不相同的 （ C）事件都是由用户操作触发的 （ D）事件可以由程序定义 29 用来测试当前读写位置是否达到文件末尾的函数是
14、（ A） EOF （ B） FileLen （ C） Len （ D） LOF 30 下列表达式中，能够保留变量 x整数部分并进行四舍五入的是 （ A） Fix(x) （ B） Rnd(x) （ C） Round(x) （ D） Int(x) 31 假定有以下循环结构 Do Until条件 循环体 Loop 则正确的叙述是 （ A）如果 “条件 ”值为 0，则一次循环体也不执行 （ B）如果 “条件 ”值为 0，则至少执行一次循环体 （ C）如果 “条件 ”值不为 0，则至少执行一次循环体 （ D）不论 “条件 ”是否为 “真 ”，至少要执行一次循环体 32 假定有以下程序段 n=0 for
15、i=1 to 3 forj=-4 t0-1 n=n+1 next J next i 运行完毕后， n的值是 （ A） 0 （ B） 3 （ C） 4 （ D） 12 33 以下关于类模块的说法不正确的是 （ A）窗体模块和报表模块都属于类模块，它们从属于各自的窗体或报表 （ B）窗口模块和报表模块具有局部特性，其作用范围局限在所属窗体或报表内部 （ C）窗体模块和报表模块中的过程可 以调用标准模块中已经定义好的过程 （ D）窗口模块和报表模块生命周期是伴随着应用程序的打开而开始、关闭而结束 34 在模块中执行宏 “macrol”的格式为是 （ A） Function RunMacro Macr
16、oName （ B） DoCmd RunMacro macr01 （ C） Sub RunMacro macrol （ D） RunMacro macrol 35 以下有关 VBA中变量的叙述错误的是 （ A）变量名的命名同字段命名一样，但变量命名不能包含有空格或除了下画线符号外的任何其他的标点符号 （ B）变量名不能使用 VBA的关键字 （ C） VBA中对变量名的大小写敏感，变量名 “NewYear”和 “newyear”代表的是两个不同的变量 （ D）根据变量直接定义与否，将变量划分为隐含型变量和显式变量 36 在 “NewVar=528”语句中，变量 NewVar的类型默认为 （ A）
17、 Boolean （ B） Variant （ C） Double （ D） Integer 37 以下哪个选项定义了 10个整型数构成的数组，数组元素为 NewArray至NewArray （ 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 38 以下有关优先级的比较，正确的是 （ A）算术运算符 关系运算符 连接运算符 （ B）算术运算符 连接运算符 逻辑运算符 （ C）连接运算符
18、 算术运算符 关系运算符 （ D）逻辑运算符 关系运算符 算术运算符 39 VBA中定义符号常量可以用关键字 （ A） Const （ B） Dim （ C） Public （ D） Static 40 定义了二维数组 A(2to5， 5)，则该数组的元素个数为 （ A） 25 （ B） 36 （ C） 20 （ D） 24 41 以下内容中不属于 VBA提供的数据验证函数是 （ A） IsText （ B） IsDate （ C） IsNumeric （ D） IsNull 42 VBA“定时 ”操作中，需要创建窗体的 “计时器间隔 (TiemrInterval)”属性值。其计量单位是 （
19、A）微秒 （ B）毫秒 （ C）秒 （ D）分钟 43 已定义好有参函数 f(m)，其中形参 m是整型变量。下面调用该函数，传递实参为 5，将返回的函数值赋值给变量 t。以下正确的是 （ A） t=f(m) （ B） t=Call f(m) （ C） t=f(5) （ D） t=Call f(5) 国家二级（模块）机试模拟试卷 1答案与解析 一、选择题 1 【正确答案】 B 【知识模块】 模块 2 【正确答案】 D 【知识模块】 模块 3 【正确答案】 C 【知识模块】 模块 4 【正确答案】 A 【知识模块】 模块 5 【正确答案】 C 【知 识模块】 模块 6 【正确答案】 A 【知识模块
20、】 模块 7 【正确答案】 B 【知识模块】 模块 8 【正确答案】 C 【知识模块】 模块 9 【正确答案】 C 【知识模块】 模块 10 【正确答案】 A 【知识模块】 模块 11 【正确答案】 D 【知识模块】 模块 12 【正确答案】 B 【知识模块】 模块 13 【正确答案】 D 【知识模块】 模块 14 【正确答案】 D 【知识模块】 模块 15 【正确答 案】 B 【知识模块】 模块 16 【正确答案】 B 【知识模块】 模块 17 【正确答案】 B 【知识模块】 模块 18 【正确答案】 A 【知识模块】 模块 19 【正确答案】 C 【知识模块】 模块 20 【正确答案】 C
21、 【知识模块】 模块 21 【正确答案】 C 【知识模块】 模块 22 【正确答案】 B 【知识模块】 模块 23 【正确答案】 B 【知识模块】 模块 24 【正确答案】 A 【知识模块 】 模块 25 【正确答案】 A 【知识模块】 模块 26 【正确答案】 D 【知识模块】 模块 27 【正确答案】 B 【知识模块】 模块 28 【正确答案】 A 【知识模块】 模块 29 【正确答案】 A 【知识模块】 模块 30 【正确答案】 C 【知识模块】 模块 31 【正确答案】 B 【知识模块】 模块 32 【正确答案】 D 【知识模块】 模块 33 【正确答案】 D 【试题解析】 窗口模块和
22、报表模块生命 周期是伴随着窗口或报表的打开而开始、关闭而结束。 【知识模块】 模块 34 【正确答案】 B 【试题解析】 该语法的结构为 DoCmd RunMacro MacroName，RepeatCount， RepeatExpression。 【知识模块】 模块 35 【正确答案】 C 【试题解析】 VBA中对变量名的大小写不敏感，变量名 “NewYear”和 “newyear”代表的是同一个变量。 【知识模块】 模块 36 【正确答案】 B 【试题解析】 当在变量名 称后没有附加类型说明字符来指明隐含类型变量的数据类型时，默认为 Variant数据类型。 【知识模块】 模块 37 【正确答案】 B 【知识模块】 模块 38 【正确答案】 B 【试题解析】 优先级：算术运算符 连接运算符 关系运算符 逻辑运算符。 【知识模块】 模块 39 【正确答案】 A 【知识模块】 模块 40 【正确答案】 D 【知识模块】 模块 41 【正确答案】 A 【知识模块】 模块 42 【正确答案】 B 【知识模块】 模 块 43 【正确答案】 C 【知识模块】 模块
