VBA典型题

VBA与模块典型题以下关于模块的说法，错误的是A 窗体模块和报表模块都属于类模块，它们从属于各自的窗体或报表B 窗体模块和报表模块具有局部特征，其作用范围局限在所属窗体或报表内部C 窗体模块和报表模块中的过程可以调用标准模块中已经定义好的过程D 窗体模块和报表模块生命周期是伴随着应用程序的打开而开始、关闭结束参考答案：D提示：B和D 都描述窗体模块和报表模块（类模块）的特征，其生命周期是伴随着窗体和报表的打开而开始、关闭而结束；标准模块随应用程序的打开而开始、关闭而结束。

下列关于标准模块的叙述中，错误的是A 标准模块可用于存放其它Access数据库对象使用的公共过程B 在Access中，可以通过创建新的模块对象而进入其代码设计环境VBEC 标准模块所有的变量或函数都具有全局性，是公共的D 标准模块的生命周期是伴随着应用程序的运行而开始、关闭结束参考答案：C提示：在各个标准模块内部即可以定义private(私有的)，也可以定义public(公有的)变量或过程关于模块，下列叙述中错误的是A 是Access存放VBA程序代码的对象B 使用VBA语言，由一个或多外函数或子过程构成C 模块包括全局模块和局部模块D 能够完成宏不能完成的复杂功能参考答案：C提示：模块包括二种：类模块（Access系统对象，如窗体、报表等对象的模块，这些模块里允许用户编程事件驱动的VBA程序）、标准模块（由用户定义的函数或子过程）。

全局和局部是变量作用域的概念。

子程序和函数分为全局和局部的，即公有的和私有的二种类型能够触发窗体的MouseDown事件的操作是A 单击鼠标B 拖动窗体C 鼠标滑过窗体D 按下键盘上的某键参考答案： A提示：按一键盘上的键将触发OnKeyPress事件，如果双击鼠标要触发DblClick事件和MouseDown二个事件。

单击鼠标将触发Click和MouseDown二个事件。

因此键盘或鼠标的一个动作可能触发多个事件。

VBA数据类型符号“＆”表示的数据类型是A 整型B 长整型C 单精度浮点型D 双精度浮点型参考答案：B提示：整型用％表示；长整型用＆表示；单精度浮点型用！表示；双精度浮点型用＃表示。

参见教材170页。

本题几乎为必考题。

VBA中定义符号常量时的关键字为A ConstB DimC PublicD Static参考答案： A提示：Const定义符号常量，Public与Private用于声明变量或函数或过程等的作用范围（域），Static用于声明静态变量，在应用程序打开后保留其值。

在模块中执行宏“macro_1”的格式是A Function.RunMacro “macro_1”B DoCmd.RunMacro “macro_1”C Sub.RunMacro “macro_1”D RunMacro “macro_1”参考答案：B提示：在模块中运行宏的语法格式是：DoCmd.RunMacro “宏名”下列有关VBA变量的叙述中，错误的是A 变量的命名与字段的命名类似，但变量命名不能包含有空格或除了下划线符号外的任何其它的标点符号，B 变量名不能使用VBA关键字C VBA中区分对变量的命名中英文字符的大小写D 根据变量直接定义与否，将变量分为隐式变量和显式变量参考答案：C提示：VBA不区分对变量中英文字符的大小写，A与a是表示同一变量。

先声明后使用的变量叫显式变量，不作类型声明，直接使用的变量叫隐式变量，系统默认为Variant（变体型）变量在“ NewVar=3”语句中，变量NewVar的数据类型为A BooleanB VariantC DoubleD Integer参考答案：B提示：见上题以下将变量NewVar定义为Integer型正确的是A Integer NewVarB Dim NewVar Of IntegerC Dim NewVar As IntegerD Dim Integer NewVar参考答案：C提示：C选项为定义变量的格式，整型变量还可以使用：Dim NewVar%判断一个日期表达式能否转换为日期或时间的函数是：A CDate()B IsDate()C Date()D IsText()参考答案：B提示：IsDate(expression)函数用于判断一个字符串表达式expression是否能转换成一个日期或时间，有效的日期是公元100年1月1日至9999年12月31日，函数返回的值为True 或False，CDate()函数将参数返回一个有效的日期或时间表达式Date()函数返回系统当前的日期（年月日）。

与此类似的有：Now（），Time()，Year()，Month()，Day()等答题技巧：在答题过程中难免会遇到自己不熟悉的函数，但不用怕，可通过使用VBA帮助来快速查阅其使用说明。

下列选项中，定义了长度为10的整型数组的是A Dim NewArray(10) As IntegerB Dim NewArray(1 to 10) As IntegerC Dim NewArray(10) IntegerD Dim NewArray(1 to 10) Integer参考答案： B提示：A选项定义了含有11个元素整型变量的数组，因默认下标是从0开始，所以数组长度为11；B定义了下标从1至10的10个元素的整型数组；C、D语法错误。

以下关于优先级的比较，正确的是A 算术运算符>关系运算符>连接运算符B 算术运算符>连接运算符>逻辑运算符C 连接运算符>算术运算符>关系运算符D 逻辑运算符>关系运算符>算术运算符参考答案：B提示：优先级：算术>连接>关系>逻辑更详细的参见教材195～197程序段For S=5 To 10 Step 1S=2*S＋1Next S该循环执行的次数是A 1B 2C 3D 4参考答案：A提示：执行一次后S＝2*5+1=11，再加步长1,得S=12,已经超过了S的终点值，所以只运行一次就结束循环。

程序段Dim I As IntegerI=Int(-3.2)则I的值为A －3B －4C 3D 3.2参考答案：B提示：Int与fix函数的功能为取整，如果参数为正数，Int和fix都将删去小数点后的部分；如果参数为负数，则 Int 返回小于或等于此参数的第一个负整数，fix返回大于或等于此参数的第一个负整数，如int(-2.2)返回-3,fix(-3.5)返回-3。

Round()函数返回参数取四舍五入后的值，如Round(1.1)的值为1,Round(1.99)的值为2。

Round(-3.1)=-3,Round(-3.9)=-4程序段Dim M As SingleDim N As SingleDim P As SingleM=Abs(-7)N=Int(-2.5)P=M+N则P的值是A 9B －9C 5D 4参考答案：D提示：7+(-3)=4建议：可以VBE中建立一个编辑模板如下，用于测试一些简单的程序运行结果Public Sub test()Debug.Print Round(1.9)End Sub对于特别简单的表达式输入，可以直接在立即窗口中输入Print Round(1.9)程序段的输出结果是( )Dim ii=1234debug.print len(i)A） 16 B） 8 C） 2 D） 4参考答案：D提示：Len函数其中包含字符串内字符的数目。

程序段D=#2005-8-1#M=month(D)则M的值是A 2005B 8C 1D 2005－08－01参考答案：B提示：Month()函数返回日期参数中的月份值。

类似的函数还有：day(),time(),hour(),minute(),second(),year(),weekday()等程序段Str=”helloworld”Str2=Right(str,3)则Str2的值是A helB loworldC rld参考答案：C提示：right(str,n)返回从字符串右边算起的n个字符与此相关的函数还有left(str,n)，mid(str,n1,n2)下列程序的输出结果是Public Sub test()Dim x, i As Integerx = 0For i = 1 To 10 Step 2x = x + ii = i * 2NextDebug.Print iEnd SubA 22B 10C 11D 16参考答案：A提示：第一圈后：x=0+1=1,i=1*2+2=4第二圈：x=1+4=5,i =4*2+2=10 Array第三圈：x=5+10=15,i=10*2+2=22注意：本题中x与输出结果无关程序段Str=”计算机科学技术”Str=Mid(str,5)则Str的返回值是A 计算机科学B 机科学技术C 计算D 学技术参考答案：D提示：Mid()函数的格式为Mid(字符串,开始位置N1,长度值N2)其中第三个参数可省。

Mid函数返回在第一个参数从N1位置开始的计数共有N2个字符的字符串。

如果定义过一个函数f(m)，其中m为整型形参，当调用函数时，传递实参为5,函数的返回值赋值给变量t，则正确的调用格式是A t=f(m)B t=f(5)D t=Call(5)参考答案： B提示：函数的调用必须不要Call关键字，必须加括号。

A项中的函数参数为形式，C、D项中的Call用于调用子过程。

可参见教材245页的5.（10）题。

在定义有参数传递的函数f()时，设形参t要传递值，则正确的格式是A f(ByVal t As Integer)B f(ByRef t As Integer)C f(Static t As Integer)D f(Const t As Integer)参考答案：A提示：ByVal为传值， ByRef为传地址在VBA程序代码调试过程中，能显示出当前过程中变量声明及变量值的是A 监视窗口B 立即窗口C 本地窗口D 代码窗口参考答案： C提示：立即窗口用于显示程序运行后结果，如变量的值，函数的返回值等本地窗口：在运行时监视变量或表达式的值。

使用时要先在“高度”菜单中选择“切换断点”后，才能在本地窗口可见变量或表达式的值监视窗口：在运行时监视查看选定的变量或表达式的值在VBA中用实参a,b调用有参数的过程Area(x,y)时，正确的格式是A Area x,yB Area a,bC Call area(x,y)D Call area a,b参考答案： B提示：A、C为形参，不是调用格式，C、D均不是合法调用函数格式Call将控制权转移到一个 Sub 过程DAO模型层次中处在最顶层的对象是A DBEngingB WorkspaceC DataBaseD RecordSet参考答案： A提示：参看教材247页的DAO模型对象结构在DAO对象中，主要用于对数据库的数据记录进行操作、使用最多的对象是A RecordSetB RelationC UserD TableDef参考答案：A提示：RecordSet主要用于对数据库中的数据进行打开、操作，因此使用最多Relation用于定义表与表的关系，主要在设计表时使用User用于建议使用数据库的用户的帐号TableDef用于定义表结构的对象连接式”2+3”&”=”&(2+3)的运行结果为A “2+3=2+3”B “2+3=5”C “5=5”D “5=2+3”参考答案： B提示：在双引号内的表示字符串，连接时保持原样，无双引号的表示表达式，要计算出结果定义了一个二维数组A(2 to 5, 5)，则该数组的元素有A 25B 36C 20D 24参考答案： D提示：第一维的2至5表示有4行，第二维的5表示从0至6,共有6列，所以计4×6＝24个元素。