窗体.docx

窗体.docx

《窗体.docx》由会员分享，可在线阅读，更多相关《窗体.docx（55页珍藏版）》请在冰豆网上搜索。

窗体

以下是某个窗体的模块代码，请分析单击窗体后程序运行至"*"号位置时变量X、Y和Z的值分别是。

DIMXASINTEGERDIMYASINTEGERPRIVATESUBFORM_CLICK（）DIMXASINTEGERX=1Y=1CALLAA（Y+1）Z=BB（X）'*******MSGBOX"X="&X&"/Y="&Y&"/Z="&ZENDSUBPRIVATESUBAA（BYVALZASINTEGER）Y=Z+XZ=X+YENDSUBPRIVATEFUNCTIONBB（BYREFYASINTEGERY=Y+1BB=X+YENDFUNCTION

参考答案：

2，2，2

答案详解：

调用AA过程后，全局变量Y的值为2。

这时形参为局部变量Y，而实参为局部变量X，传递采用“传址”调用，即形参Y与实参X占用同一内存地址，并且形参Y会获得实参X的传递值1。

当执行BB过程中的Y=Y+1语句时，形参Y与实参X的值均为1+1=2，此时，函数的返回值为BB=X+Y，是全局变量X与形参Y相加，值为0+2=2。

综合判断，得出答案为2，2，2。

在窗体上添加两个文本框（名为TXT1和TXT2）和一个命令按钮（名为BTNOK），然后PRIVATESUBBTNOKCLICK（）ME!

TXT1="ABCD"ME!

TXT2="123"ME!

TXT1=ME!

TXT2&ME!

TXT1ME!

TXT2=ME!

TXT2+456ENDSUB程序运行后，单击命令按钮，文本框TXT1和TXT2中显示的内容分别为和

参考答案：

123ABCD579

答案详解：

程序运行后，文本框TXT1中显示的内容为TXT1和TXT2的合并内容，合并操作通过“&”符号完成；文本框TXT2中显示的内容为TXT2的内容加上456，得到579。

以下程序运行时连续单击4次窗体，则第4次单击窗体后消息框中的输出结果为。

PRIVATEFORM_CLICK（）STATICAASINTEGERDIMBASINTEGERB=A+B+1A=A+BMSGBOXA&","&BENDSUB

参考答案：

15，8

答案详解：

VBA中可以使用Static关键字来定义静态变量。

静态变量的使用有一个明显特点，就是在程序运行期间它能够保留局部变量的值。

本题中定义了两个局部变量，其中a为静态局部变量，b为普通变量。

当连续4次点击运行时，变量b的值每次都被初始化为0，而变量a却可以保留上次运行的结果。

故第4次单击窗体后消息框里的输出结果为“15.8”。

所谓控件，它是一个，例如文本框、复选框、命令按钮等。

参考答案：

图形对象

答案详解：

控件就是一个图形对象，例如文本框、复选框、命令按钮等。

在窗体上可以添加三种不同类型的控件：

绑定控件、未绑定控件和计算控件。

运行如下程序段：

x=1y=1z=1Forj=1To3Fork=1To3Ifj=1Thenx=x+y+zElseIfj=2Thenx=2*x+2*y+2*zElsex=3*x+3*y+3*zEndIfNextkNextjx的值应是（）。

参考答案：

2346模块/VBA程序设计基础当j=1时，内层循环执行x=x+y+z=x+2三次，所以x=7；当j=2时，内层循环执行x=2*x+2*y+2*z=2*x+4三次，所以x=84；当j=3时，内层循环执行x=3*x+3*y+3*z=3*x+6三次，所以x=2346。

则最后的结果是：

x=2346。

在窗体上画一个命令按钮，然后编写如下程序：

Functionfun（ByValnumAsLong）AsLongDimkAsLongk=1num=Abs（num）DoWhilenumk=k*（num\10）num=num\10Loopfun=kEndFunctionPrivateSubCommand1_Click（）DimnAsLongDimrAsLongn=InputBox（"请输入一个数"）n=CLng（n）r=fun（n）MsgBoxrEndSub程序运行后，单击命令按钮，在输入对话框中输入234，消息框显示的结果为（）。

参考答案：

0模块/VBA程序设计基础程序将输入的内容234转变为长整型传入函数fun中，然后进入循环。

循环第一次结束的时候：

k=23num=23循环第二次结束的时候：

k=46num=2循环第三次结束的时候：

k=0num=0

在窗体上画一个命令按钮，然后编写如下代码：

PrivateSubCommand1_Click（）DimM（10）AsIntegerFork=1To10M（k）=12-kNextkX=6MsgboxM（2+M（x））EndSub程序运行后，单击命令按钮，消息框显示的是（）。

参考答案：

4模块/VBA程序设计基础M（6）的值为12-6=6；则有M（2+6）=M（8）的值为12-8=4。

Access中，“自动创建报表”向导分为：

纵栏式和（）两种。

参考答案：

表格式报表的基本操作/报表分类在Access报表中，用户可以利用自动创建报表向导创建纵栏式报表和表格式报表。

纵栏式报表将一个报表按列排列，然后在排列好的字段内显示数据，使用纵栏式报表向导可以创建一个或两个垂直的列，各个字段的名称都显示在该字段的左侧。

表格式报表以行和列的方式显示或打印出带有分组和汇总的数据，还可以包括摘要和分组/汇总报表。

窗体由多个部分组成，每个部分称为一个（）。

参考答案：

节窗体的基本操作/窗体分类窗体由多个部分组成，每个部分称为一个“节”。

大部分窗体只有主体节。

如果需要，也可以在窗体中包含窗体页眉、页面页眉、页面页脚和窗体页脚等部分。

Access数据库包括表、查询、窗体、报表、（）、宏和模块等基本对象。

参考答案：

页或数据访问页数据库基础知识/基本概念Access数据库由数据库对象和组两部分组成，其中对象又分为7种。

这些数据库对象包括：

表、查询、窗体、报表、数据访问页、宏和模块。

表是数据库中用来存储数据的对象，是整个数据库系统中的基础。

查询是数据库设计目的的体现，数据库建完以后，数据只有被使用者查询，才能真正体现它的价值。

窗体是Access数据库对象中最具灵活性的一个对象，其数据源可以是表或查询。

报表是Access数据库中用于打印输出数据的。

数据访问页是在Access2000时才增加的数据库对象，它是一种特殊类型的Web页，用户可以在此Web页中与Access数据库中的数据进行联接，查看、修改Access中的数据，为通过网络进行数据发布提供了方便。

宏是一系列操作的集合，其中每个操作都能实现特定的功能。

模块是将VisualBasicforApplications声明和过程作为一个单元进行保存的集合，是应用程序开发人员的工作环境。

纵栏式窗体每次显示条记录。

参考答案：

1

答案详解：

本题考查纵栏式窗体的特点。

纵栏式窗体每次只显示1条记录。

本题的答案是1。

在Access中，用户在中可以创建或修改宏的内容。

参考答案：

设计视图

答案详解：

本题考查设计视图的作用。

在Access中，宏只有设计视图一种方式。

这是考生应该注意的地方，它不同于Access的其他对象，如表、报表等，它们都有不止一种视图。

在设计视图中，用户可以创建或是修改宏的内容。

宏的设计视图的窗口中分为设计区和参数区两部分。

在宏窗口上部的设计区中，用户可以定义和编辑宏中的内容。

设计区由4列组成，它们分别是“宏名”、“条件”、“操作”和“备注”列。

假定窗体的名称为Form1，则把窗体的标题设置为“Access模拟”的语句是______。

参考答案：

Form1.Caption="Access模拟"

答案详解：

本题考查窗体标题的基本知识。

Caption属性代表窗体的标题，设置窗体的标题实际卜就是给窗体的Caption属性赋值的过程。

表的设计视图分为上下两部分，上半部分是______，下半部分是字段属性区。

参考答案：

字段输入区

答案详解：

本题考查表设计视图的基本知识。

表的设计视图分为上下两部分，上半部分是字段输入区，下半部分是字段属性区。

窗体中有两个命令按钮：

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

以下事件过程的功能是：

单击“测试”按钮时，窗体上弹出一个消息框。

如果单击消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮，关闭窗体。

按照功能要求，将程序补充完整。

PrivateSubcmdTestClick（）Answer=（“隐藏按钮”，vbOKCancel）IfAnswer=vbOKThencmdDisplay.Visible=ElseDocmd.CloseEndIfEndSub

参考答案：

MsgBox（“”，vbOKCancel），False

答案详解：

消息框（MsgBox）用于对话框中显示信息，书写格式为MsgBox（提示，[按钮][，标题]）。

根据题意，消息框中显示两个按钮“确定”和“取消”，所以设置其值为“vbOKCancel!

”，因为没有要求说明提示语句和标题，可以不进行设置。

cmdDisplay.Visible用来设置cmdDisplay（显示）的属性，Visible决定控件是否可见，其属性False表示程序运行时控件隐含起来，用户看不到但本身存在，如果单击“确定”按钮，则“显示”控件被隐藏。

在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：

PrivateSubCommand1_Click（）Dims,iFori=1To10S=S+iNextiMsgBoxsEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果为

参考答案：

55

答案详解：

for…Next语句能够重复执行程序代码区域特定次数。

此题中i赋初值1，步长缺省为1，也就是求1～10的和，所以结果为55。

在窗体中添加一个命令按钮（名为Command1），然后编写如下代码：

PublicxasintegerPrivateSubCommand1_Click（）x=5Calls1Calls2MsgBoxxEndSubPrivateSubs1（）x=x+10EndSubPrivateSubs2（）Dimxasintegerx=x+10EndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是______

参考答案：

15

答案详解：

本题使用Call调用子过程s1，s2。

x=5在调用子过程s1后，x=15，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。

在调用s2时，由于使用Dim…As关键字定义x，所以其值是模块范围的。

所以在消息框中输出的值，是从子过程s2传回的值。

在窗体上有一个文本框控件，要求每隔一秒在文本框中显示一次当前时间，除了要设置窗体的计时器间隔为1秒外，还需要设计______事件。

参考答案：

Form_Timer（）

答案详解：

本题考查窗体属性的知识。

在窗体属性中有一个计时器时间间隔属性，该属性默认为“0”，表示计时器未启用。

一旦将其设置为非0值，将会启用计时器，每隔指定的时间间隔自动执行计时器事件。

窗体的计时器事件的过程名为Form_Timer（）。

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

PublicxAsIntegerPrivateSubCommand1_Click（）x=3CallnCallf2MsgBoxxEndSubPrivateSubf1（）x=x*xEndSubPrivateSubf2（）Di