程序设计基础Word格式文档下载.docx

程序设计基础Word格式文档下载.docx

《程序设计基础Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《程序设计基础Word格式文档下载.docx（13页珍藏版）》请在冰豆网上搜索。

C、VBA中对变量名的大小写敏感，变量“Newyear”和“newyear”代表的是两个不同的变量

D、根据变量直接定义与否，将变量划分为隐式变量和显式变量

A，C

变量命名规则[必须以字母或汉字开头，长度小于等于255个字符；

不能包含：

算术运算符（+—*/^）、关系运算符（>

<

>

=<

>

=）、特殊符号（.@$%&

等），不能使用VBA中的关键字；

不区分大小写，同一范围内必须是唯一的。

]

字段名命名规则[字段名可以采用字母、汉字、数字及特殊字符（排除

句号.、叹号！

、中括号[]、重音符号’、前导空格及ASCII码值为0～32的不可打印字符）组成，长度1～64个字符。

一个表不允许有两个完全相同的字段名。

变量一般是先声明后使用，这种变量称为显式变量；

也可不声明直接使用，这种变量称为隐式变量，隐式变量在未赋值前都是Variant类型，此时一般是作为局部变量。

6、在“NewVar=528”语句中，变量NewVar的类型默认为（）。

A、BooleanB、VariantC、DoubleD、Integer

答案：

不声明直接使用的变量，在未赋值前都是Variant类型，赋值后会根据所赋值类型而发生转变，此处为变量NewVar赋值528，所以变成了整（Integer）类型。

。

7、以下将变量NewVar定义为Integer型正确的是（）。

A、IntegerNewVarB、DimNewVarOfInteger

C、DimNewVarAsIntegerD、DimIntegerNewVar

变量声明的一般格式：

[Public|Private|Dim|Static]变量名[as类型]

8、可以判定某个日期表达式能否转换为日期或时间的函数是（）。

A、CDateB、IsDateC、DateD、IsText

IsDate（参数）函数返回Boolean值，指出一个表达式是否可以转换成日期或时间。

如果表达式是一个日期/时间，或可以作为有效日期/时间识别，则IsDate返回True；

否则返回False。

A答案CDate是日期转换函数，将一个有效日期/时间表达式转换为Date类型；

C答案Date函数返回当前系统日期；

D答案IsText在VBA中没有这个函数。

9、以哪个选项定义了10个整型数构成的数组，数组元素为NewArray

（1）至NewArray（10）（）。

A、DimNewArray（10）AsInteger

B、DimNewArray（1to10）AsInteger

C、DimNewArray（10）Integer

D、DimNewArray（1to10）Integer

数组声明的一般格式：

[Public|Private|Dim|Static]数组名（[下标1下界to]下标1上界[，[下标2下界to]下标2上界[，……]]）[as类型]

若省略下标下界，则默认下标下界值是0，也可以在模块声明部分使用OptionBase1语句将数组的默认下标下界从0改为1。

10、以下有关优先级的比较，正确的是（）。

A、算术运算符>

关系运算符>

连接运算符

B、算术运算符>

连接运算符>

逻辑运算符

C、连接运算符>

算术运算符>

关系运算符

D、逻辑运算符>

算术运算符

优先级从高到低：

函数→算术运算符→字符运算符→关系运算符→逻辑运算，“连接运算符”是属于字符运算。

11、程序段：

Fors=5to10step2

s=2*s

Nexts

该循环执行的次数为（）。

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

A

开始执行For语句时，s=5，判断5<

10条件成立，执行循环体s=2*5=10，Nexts由于步长值是2，所以此时s=10+2=12，再次返回For语句判断，12>

10条件不成立，退出循环。

所以整个过程循环体只执行了1次。

12、程序段：

DimIAsInteger

I=Int（—3.25）

I的返回值是（）。

A、—3B、—4C、3D、3.25

Int（数值表达式）函数的功能是向下（比数值表达值小的整数）取整，故比—3.25小的整数是—4。

13、程序段：

DimMAsSingle

DimNAsSingle

DimPAsSingle

M=Abs（—7）

N=Int（—2.4）

P=M+N

P的返回值是（）。

、

A、9B、—9C、5D、4

变量M、N、P都被定义为单精度浮点型，语句M=Abs（—7）取绝对值后M=7，N=Int（—2.4）向下取整后N=—3，P=M+N=7+（—3）=4，所以选D。

14、

典型试题

（一）填空题

1、VBA中变量的作用域分为3个层次，这3个层次是局部变量、模块变量和____________。

2、VBA的三种流程控制结构是顺序结构、选择结构和_______________。

3、VBA的有参过程定义，形参用_____________说明，表明该形参为传值调用。

4、ONErrorGoTo0语句的含义是___________________。

5、以下程序段的功能是：

创建一个大字符串，其内容为多个小字符串（由0到9的十个数字组成一个小字符串）组成，每个小字符串之间用空格隔开。

外层循环使用一个变量当作循环计数器，每循环一次，变量值减一。

请将下列程序补充完整。

DimWords，Chars，Mystring

ForWords=5to1step-1

ForChars=0to9

Mystring=____________

Next

Mystring=______________

6、如下程序的功能为：

内层的Do……Loop语句循环到第10次时，将标志值设置为False，并用ExitDo语句强制退出内层循环。

外层循环则在检查到标志值为False时，马上退出。

请填空。

DimCheck，Counter

Check=TrueL：

Counter=0

Do

DoWhileCounter<

20

Counter=Counter+1

IfCounter=10then

_____________

ExitDo

EndIf

Loop

If_____________Then

_______________

7、执行以下的程序段后，s的值为_____________________。

Dimsasinteger

Fori=1to100

S=s+i

Ifs>

20Then

ExitFor

8、在某个窗体已编以下事件过程：

PrivateSubForm_click（）

DimIasInteger，PasInteger

I=1：

P=1

DoWhileI<

=10

P=P*2

I=I+1

MsgBoxP

EndSub

打开窗体运行后，单击窗体，在弹出的消息框中输出_________________。

9、窗体中有两个命令按钮：

“显示”（控件名为cmdDisplay）和“测试“（控件名为cmdTest）。

当单击“测试”按钮时，执行的事件功能是：

首先弹出消息框，若单击其中的“确定”按钮，则隐藏窗体上的“显示”按钮；

否则直接返回到窗体中。

请在空白处填入适当的语句，使程序可以完成指定的功能。

PrivateSubcmdTest_click（）

Answer=_____________（“隐藏按钮？

”，vbOKCancel+vbQuestion，“Msg”）

IfAnswer=vbOKThen

Me!

cmdDisplay.Visible=___________

EndSub

（二）单项选择题

1、定义了二维数组A（2to 

5，5），则该数组的元素个数为（）。

A、25B、36C、20D、24

2、已知程序段：

S=0

ForI=1to10step3

S=s+1

I=I*3

NextI

当循环结束后，变量I的值为（）。

A、33B、18C、21D、16

3、以下内容中不属于VBA提供的数据验证函数是（）。

A、IsTextB、IsDateC、IsNumericD、IsNull

4、VBA“定时”操作中，需要创建窗体的“计时器间隔（TimerInterval）”属性值，其计量单位是（）。

A、微秒B、毫秒C、秒D、分钟

5、已定义好有参函数f（m），其中形参m是整型变量。

下面调用该函数，传递实参为5，将返回的函数值赋值给变量t 

以下正确的是（）。

A、t=f（m）B、t=Callf（m）C、t=f（5）D、t=callf（5）

6、在有参函数设计时，要想实现某个参数的“双向”传递，就应当说明该形参为“传址”调用形式。

其设置选项是（）。

A、ByValB、ByRefC、OptionalD、ParamAray

7、VBA的逻辑值进行算术运算时，True值被当做（）。

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

8、VBA中不能进行错误处理的语句结构是（）。

A、OnErrorThen标号B、OnErrorGoto标号

C、OnErrorResumeNextD、OnErrorGoto0

9、VBA中实际参数a和b调用有参过程Area（m，n）的正确形式是（）。

A、Area（m，n）B、Area（a，b）

C、CallArea（m，n）D、CallArea（a，b）

10、能够实现从指定记录集里检索特定字段值的函数是（）。

A、NzB、DSumC、DLookupD、Rnd

11、VBA中定义局部变量可以用关键字（）。

A、ConstB、DimC、PublicD、Static

12、VBA表达式IIf（0，20，30）的值为（）。

A、20B、30C、25D、10

13、连接式“2+3”&

“=”&

（2+3）的运算结果为（）。

A、“2+3=2+3”B、“2+3=5”C、“5=5”D、“5=2+3”

14、VBA表达式Chr（Asc（Ucase（“abcdefg”）））返回的值是（）。

A、AB、97C、aD、65

15、定义了三维数组A（5，5，5），则该数据的元素个数为（）。

A、15B、25C、125D、216

16、假定有以下函数过程：

FunctionFun（SAsString）AsString

DimS1AsString

Fori=1toLen（S）

S1=UCase（Mid（S，i，1））+S1

Nexti

Fun=S1

EndFunction

Fun（“abcdefg”）的输出结果为（）。

A、abcdefgB、ABCDEFGC、gfedcbaD、GFEDCBA

17、运行下面的程序段：

Fork=5to10Step2

K=k*2

Nextk

则循环次数为（）。

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

18、表达式（“周”<

“刘”）返回的值是（）。

A、FalseB、TrueC、—1D、1

19、下列算式正确的是（）。

A、Fix（2.8）=3B、Fix（-2.8）=-3

C、Fix（-2.8）=-2D、以上都正确

20、从字符串A=“123456”中返回子串B=“34”的正确表达为（）。

A、B=Mid（A，3，2）B、Right（left（A，4），2）

C、B=left（Right（A，4），2）D、A、B和C

21、下面表达式为假的是（）。

A、（4>

3）B、（（40or（3>

2））=-

D、（（4And（3<

2））=1）D、（Not（3>

=4））

22、表达式（10.2\5）返回的值是（）。

A、0B、1C、2D、2.04

23、VBA表达式（12mod-5）返回的值是（）。

A、0B、1C、2D、-2

24、表达式（-12.7Mod-5）返回的值是（）。

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

25、关于模块，下面叙述错误的是的（）。

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

B、以VBA语言为基础，以函数和子过程为存储单元

C、模块包括全局模块和局部模块

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

26、窗体模块属于（）。

A、标准模块B、类模块C、全局模块D、局部模块

27、函数String（n，字符串）的功能是（）。

A、把数值型数据转换为字符串

B、返回由n个字符组成的字符串

C、从字符串中取出n个字符

D、从字符串中第n个字符的位置开始取子字符串

28、以下关于过程和过程参数的描述中，错误的是（）。

A、过程的参数可以是控件名称

B、用数组作为过程的参数时，使用的是“传址”方式

C、只有函数过程能够将过程中处理的信息传回到调用的程序中

D、窗体可以作为过程的参数

29、能够触发窗体的MouseDown事件的操作是（）。

A、鼠标按下B、鼠标释放

C、鼠标滑过窗体D、按下键盘上的某个键

30、能够触发窗体的DbClick事件的操作是（）。

A、单击鼠标B、双击窗体

31、VBA数据类型符号“&

“表示的数据类型是（）。

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

32、VBA数据类型符号“%“表示的数据类型是（）。

33、变量声明DimNewVar表示变量是什么变量（）。

A、整型B、长整型C、变体型D、双精度数

34、返回值为真的表达式为（）。

A、（10>

4And1>

=2）B、（10>

4Or1>

=2）

C、Not（4<

3）D、（4<

3）

35、VBA表达式Dateserial（2014—1，8—2，0）返回的值是（）。

A、2014/6/31B、2014/5/31C、2013/5/31D、2013/6/1

36、函数Instr（“1234567”，“67”）返回的值是（）。

A、“67”B、“1234567”C、5D、6

37、函数Len（Trim（“ABC”&

Space

（1）&

“计算机”））返回的值为（）。

A、6B、7C、9D、10

38、在日期/时间数据类型中，每个字段需要几个字节的存储空间（）。

A、4B、8C、12D、16

39、执行如下语句：

A=InputBox（“1”，“2”，“3”，“4”，“5”），将显示一个输入的对话框，在对话框的输入区中显示的信息是（）。

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

40、已知程序段：

ForI=1to10step2

S=S+1

I=I*2

当循环结束后，变量I，S的值分别为（）。

A、22，3B、11，4C、10，5D、16，6

41、单击窗体上Commmand1命令按钮时，执行如下事件过程

PrivateSubCommand_click（）

A$=”softwareandhardware”

bS=Right（A$，8）

c$=Mid（A$，1，8）

MsgBoxA$，B$，C$，1

则在弹出的信息框的标题栏中显示的信息是（）。

A、softwareandhardwareB、software

C、hardwareD、1

42、下面过程运行之后，则变量J的值为（）。

PrivateSubFun（）

DimJAsinteger

J=5

Do

J=J+2

LoopWhileJ>

10

A、5B、7C、9D、11

43、下面程序段执行的结果是（）。

DimIasInteger，SasInteger

ForI=10to1step-1

S=S+I

A、S=0B、S=10C、死循环D、S=55

44、设有如下的记录类型

Typestudent

NumberAsString

NameAsString

AgeAsInteger

EndType

则正确引用该记录类型变量的代码是（）。

A、student.Name=“张红”

B、DimsAsStudent:

s.name=“张红”

C、DimsAsTypeStudent:

D、DimsAsType:

45、下面过程运行之后，则变量J的值为（）/

PrivateSubFun（）

J=2

J=J*3

LoopUntilJ>

15

A、2B、6C、15D、18

46、下面Main过程运行之后，则变量J的值为（）。

PrivateSubMainSub（）

CallGetData（J）

PrivateSubGetData（ByReffAsInteger）

f=f*2+Sgn（—1）

A、5B、7C、9D、10

47、VBA中定义静态变量可以用关键字（）。

48、在一个窗体中添加了一个Command0按钮，并为该按钮编写了单击事件过程，代码如下：

PrivateSubCommand0_click（）

StaticaAsInteger

a=a+3

若单击该按钮3次，则a的值是（）。

A、3B、0C、6D、9