教学文库网 - 权威文档分享云平台
您的当前位置:首页 > 精品文档 > 实用模板 >

VBA练习1(答案)

来源:网络收集 时间:2026-08-25
导读: VBA练习1 一、选择题 1、下列关于VBA面向对象中的“事件”,说法正确的是(B)。 A、每个对象的事件都是不相同的 B、触发相同的事件,可以执行不同的事件过程 C、事件可以由程序员定义 D、事件都是由用户的操作触发的 2、设a,b为整数变量,且均不为0,下列

VBA练习1

一、选择题

1、下列关于VBA面向对象中的“事件”,说法正确的是(B)。 A、每个对象的事件都是不相同的

B、触发相同的事件,可以执行不同的事件过程 C、事件可以由程序员定义

D、事件都是由用户的操作触发的

2、设a,b为整数变量,且均不为0,下列关系表达式中恒成立的是(C)。 A、a*b\\a*=1 B、a\\b*b\\a=1 C、a\\b*b+a Mod b=a D、a\\b*b=a

3、设有如下变量声明:Dim TestDate As Date ,变量TestDate正确赋值的表达式是(A)。A、TestDate=#1/1/2007# B、TestDate#″1/1/2007″#

C、TestDate=date(″1/1/2002″) D、TestDate=Format(″m/d/yy″,″1/1/2002″) 4、下列可作为Visual Basic变量名的是(D)。

A、B#C B、4A C、?xy D、constA 5、以下内容不属于VBA提供的数据验证的函数是( A)。 A、Is Text B、Is Date C、Is Numeric D、Is Null 6、在VBA编辑器中打开立即窗口快捷键是(A)。

A、Ctrl +G B、Ctrl +R C、Ctrl +V D、Ctrl +C 7、VBA表达式Chr(Asc(Ucase(″abcdefg″)))的返回值是(A)。 A、A B、97 C、a D、65 8、在Access下,打开VBA的快捷键是(C)。

A、F5 B、Alt+F4 C、Alt+F11 D、Alt+F12 9、VBA中定义局部变量可以用关键字(B)。

A、Const B、Dim C、Public D、Static 10、VBA中不能进行错误处理的语句结构是(A)。

A、On Error Then标号 B、On Error Goto标号 C、On Error Resume Next D、On Error Goto 0 11、下列关于VBA面向对象中的“方法”中说法正确的是(A)。 A、方法是属于对象的 B、方法是独立的实体 C、方法也可以由程序员定义 D、方法是对事件的响应 12、以下(C )是Visual Basic合法的数组元素。

A、X9 B、X[4] C、x(1.5) D、x{7} 13、关于模块下面叙述错误的是(C)。

A、是Access系统中的一个重要对象

B、以VBA语言为基础,以函数和子过程为存储单元 C、包括全局模块和局部模块

D、能够完成宏所不能完成的复杂操作

14、VBA数据类型符号“&”表示的数据类型是( B)。

A、整型 B、长整型 C、单精度 D、双精度

15、VBA中用实际参数a和b调用有参函数Area(m,n)的正确形式是(B)。 A、Area m,n B、 Area a,b

C、Call Area(m,n) D、Call Area a,b

16、VBA的逻辑值进行算数运算时,True值被当作(B)。 A、0 B、-1 C、1 D、任意值 17、在VBA中,下列变量名中不法的是(B)。

A、你好 B、ni hao C、nihao D、ni_hao 18、VBA中定义静态变量可以用关键字(D)。

A、Const B、Dim C、Public D、Static 19、下列关于过程的说法,错误的一项是(B)。 A、函数过程有返回值 B、子过程有返回值

C、函数声明使用Function语句,并以End Function语句作为结束 D、声明子过程以Sub关键字开头,并以End Sub语句作为结束 20、设有如下声明: Dim X As Integer

如果Sgn(X)的值为-1,则X的值是(D)。 A、整数 B、大于0的整数 C、等于0的整数 D、小于0的数

21、如果要在VBA中运行OpenForm操作,可使用(A)对象的OpenForm方法。A、DoCmd B、Form C、Report D、Query

22、能被“对象所识别的动作”和“对象所执行的活动“分别称为对象的(C)。 A、方法和事件 B、事件和属性 C、事件和方法 D、属性和事件

23、以下哪个选项定义了10个整型数构成的数组,数组元素为New Array(1)至 New Array(10)?(B)。

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

24、已定义好有参函数f(m),其中形参m是整型量。下面调用该函数,传递实参为5,将返回值赋给变量t。以下正确的是( C )。

A、t=f(m) B、t=Call f(m) C、t=f(5) D、t= Call f(5) 25、在“New Ver=528”语句中,变量New Ver的类型默认为( B)。

A、Boolean B、Variant C、Double D、Integer 26、设a,b为整数变量,且均不为0,下列关系表达式中恒成立的是(C)。 A、a*b\\a*=1 B、a\\b*b\\a=1

C、a\\b*b+a Mod b=a D、a\\b*b=a

27、设有如下变量声明:Dim TestDate As Date ,变量TestDate正确赋值的表达式是( A)。 A、TestDate=#1/1/2007# B、TestDate#″1/1/2007″#

C、TestDate=date(″1/1/2002″) D、TestDate=Format(″m/d/yy″, ″1/1/2002″) 28、有如下程序 a=100 Do

s=s+a a=a+1

Loop While a>120

Print a

运行时输出的结果是(D )。

A、100 B、120 C、201 D、101 29、下列程序的执行结果是(A)。 a=75

If a>90 Then i=4 If a>80 Then i=3 If a>70 Then i=2 If a>60 Then i=1

Print″i=″;i

A、i=1 B、i=2 C、i=3 D、i=4 30、下面程序段循环次数是(B)。 Fox k=1 to 10 k=k*3 Next k

A、1 B、2 C、3 D、4

二、填空题

1、变量生存时间是指变量从模块对象( 首次出现(声明)到消失 )的代码执行时间。 2、子过程与函数过程的区别在于( 函数过程返回值而子过程不返回值 )。 3、过程是完成指定任务的一段程序代码,可以通过调用的方式作用,过程有函数 和( 子过程 )两种类型。

4、VBA中定义符号常量的关键字是( const )。

5、在Access中窗体、报表及控件的事件处理一般有两种形式,一是写事件代码,即VBA编程;二是选择设计好的(宏对象)。 6、VBA的全称是(visual basic for application )。

7、模块包含了一个生命区域和一个或多个子过程或函数过程(以 function 开头 )。 8、窗体模块和报表模块属于( 类模块 )。

9、说明变量最常用的方法,可使用( dim?as? )结构。 10、下面程序的运行结果为( 8 )。 x=-2.3 y=125

z=Len(Str$ (x)+ Str$ (y) Print z

11、在Access中VBA通过数据库引擎可以访问的数据库有以下3种类型:本地数据库、外部数据库和( ODBC数据库)。

12、某窗体中有一命令按钮,名称为C1。要求在窗体视图中单击此命令按钮后,命令按钮上显示的文字颜色为棕色(棕色代码为128),实现该操作的VBA语句是( me!C1.forecolor=128)。 13、VBA的运行机制是( 事件驱动 )。

14、在Visual Basic中,允许一个变量未加定义直接使用,这样VBA即把它当作某种类型的变量,若使用Dim语句定义这种类型的变量,则在As后面应使用( variant)关键字。 15 …… 此处隐藏:72字,全部文档内容请下载后查看。喜欢就下载吧 ……

VBA练习1(答案).doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印
本文链接:https://www.jiaowen.net/wendang/519166.html(转载请注明文章来源)
Copyright © 2020-2025 教文网 版权所有
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ:78024566 邮箱:78024566@qq.com
苏ICP备19068818号-2
Top
× 游客快捷下载通道(下载后可以自由复制和排版)
VIP包月下载
特价:29 元/月 原价:99元
低至 0.3 元/份 每月下载150
全站内容免费自由复制
VIP包月下载
特价:29 元/月 原价:99元
低至 0.3 元/份 每月下载150
全站内容免费自由复制
注:下载文档有可能出现无法下载或内容有问题,请联系客服协助您处理。
× 常见问题(客服时间:周一到周五 9:30-18:00)