Access2010-VBA基础测试题

2016级1班半期考试题（110分）

姓名：总分：

一、选择题（每题3分，共48分）

1.VBA提供了多种数据类型，用于存放姓名通常采用哪种数据类型（）

A:byte B:integer C: string D: single

2.以下哪种可以定义变量（）

A:sub…… end sub B:dim…… as……C:if…… end if D: do……loop

3.变量名最长不能超过( )个字符

A:128 B:64 C:255 D: 256

3.以下可以存放小数的数据类型是（）

A:单字节B:整型C：长整型D: 双精度

4.按照先后顺序，一条一条依次执行语句，是什么结构（）

A:顺序B：分支C:选择D:循环

5.打开立即窗口的快捷键是（）

A:ctrl+G B:alt+G C:shift+ＧD: ctrl+shift+G

6. Access2010中，关于VBA，以下说法错误的有( )

A．VBA中，逻辑运算符的优先级比关系运算符的优先级要低

B．VBA中，允许多条程序语句行合写在一行上

C．VBA中，循环结构的语句有For…Next循环和Do…Loop循环两种

D．表达式102=98+4的计算结果为数值类型

7.定义长整形，可用以下哪种类型申明符定义（）

A:@ B:% C:& D: ！

规定，文本型使用（）符号作为定界符

A:引号B:#号C:分好D:逗号

9.以下运算符那个的优先级最高（）

A:算数运算符B:关系运算符C:逻辑运算符D: 字符串运算符

10.以下“=”符号，表示赋值的是（）

A: 37=60 B:”a”=”b”C:c=”您好！中国” D: #2015-01-01#=#2015-01-01#

11.如果条件为真执行语句组，条件为假什么都不执行是什么结构（）A:分支B:单分支C:多分支D: 循环

12.通过键盘输入为变量赋值通常采用（）函数

A:msgbox( ) B: C:inputbox（）D:val( )

13.以下表达式7 mod 5 的值是（）

A:35 B:12 C:2 D:1

14．VBA的逻辑值进行算术运算时，True值被当作( )

A)0 B)-1 C)1 D)任意值

15. 下列逻辑表达式中，能正确表示条件“x和Y都是奇数”的是( )

A) x Mod 2=1 Or y Mod 2=1 B) x Mod 2=0 Or y Mod 2=0

C)x Mod 2=1 And y Mod 2=1 D)x Mod 2=0 And y Mod 2=0

16. 有以下程序

sub aa()

dim a as single

a=inputbox(“a=”)

If a>=60 Then

Result=＂及格＂

Else If a >70 Then

Result=＂通过＂

Else If a >85 Then

Result=＂合格＂

End Sub

运行程序时输入的值为85，result的结果为( )。

A:及格B:通过C:合格D:空值

二、多项选择（每个4分，16分）

1.可以存放小数的数据类型有（）

A:整型B:单精度C双精度D:小数

2.以下是运算符的是（）

A:mod B:+ C:* D:<=

3.程序结构有（）

A:顺序B：分支C:goto D:循环

4.以下表达式结果为真的有（）

A:3>=5 B：3<=5 C:3<=5 or 3>=5 D:3<>0 三、填空题（每空2分，共16分）

中双精度的类型标识是（）

2.布尔型数据，true(真)存储为-1，false(假)存储为()

３.将文本类型数据转换为数字，通常采用（）函数

4. b=5*2+3/3 ,b的结果为（）

5. a1= 1<>5 and 7>=8 ,a1的结果为（）

6、len(“四川省乐至县”)的结果为（）

7、int+int的结果为（）

8、产生[1,10]之间的随机整数的表达式为（）

四、判断(每小题2分，共12分)

1.算数运算符的运算优先级大于关系运算符（）

2.在vba中布尔型数据把非0当作为true(真) （）

3.逻辑与（and）,标识，前后的逻辑值同时为真才为真（）

4.“=“符号有两种意思，表示赋值运算符，还表示逻辑运算符（）.

5、一个模块只能含有1个过程。（）

6、VBA变量名不区分大小写。（）

五、综合题：（15分）

1、写出下列数学式的VBA表达式。(4分)

（1）两个数的立方和

（2）两数差的平方大于100.

2、写出下列语句。（4分）

（1）将”你好”赋给变量nh

(2)将变量t的值增加2后赋给t.

2、编写程序，完形填空。（10分）

‘判断给定数的符号

Sub fh()

_______ x as double ‘声明x是双精度

X=_______________________ （”请输入一个数：”）‘由输入对话框给变量x赋值

If ______________then

x & “的符号为正”

Else

x & “的符号不为正”

End if

__________________________