【计算机类职业资格】VB笔试-试卷28及答案解析.doc

1、VB 笔试-试卷 28 及答案解析(总分：94.00，做题时间：90 分钟)一、选择题(总题数：36，分数：72.00)1.选择题（）下列各题 A、B、C、D 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。（分数：2.00）_2.在关系代数运算中，有 5 种基本运算，它们是( )。（分数：2.00）A.并()、差(-)、交()、除()和笛卡儿积()B.并()、差(-)、交()、投影()和选择()C.并()、交()、投影()、选择()和笛卡儿积()D.并()、差(-)、投影()、选择()和笛卡儿积()3.在数据库系统的组织结构中，下列( )映射把用户数据库与概念数据库联系

2、了起来。（分数：2.00）A.外模式模式B.内模式外模式C.模式内模式D.内模式模式4.下列关于线性链表的描述中，正确的是( )。 I、只含有一个指针域来存放下一个元素地址 、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件) 、结点由两部分组成：数据域和指针域。（分数：2.00）A.仅 I、B.仅 I、C.仅、D.全部5.下面关于数据库三级模式结构的叙述中，正确的是( )。（分数：2.00）A.内模式可以有多个，外模式和模式只有一个B.外模式可以有多个，内模式和模式只有一个C.内模式只有一个，模式和外模式可以有多个D.模式只有一个，外模式和内模式可以有多个6.设有关键码序列(6

3、6，13，5l，76，81，26，57，69，23)，要按关键码值递增的次序排序，若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为( )。（分数：2.00）A.23，13，51，57，66，26，81，69，76B.13，23，26，51，57，66，81，76，69C.23，13，51，57，26，66，81，69，76D.23，13，51，57，81，26，66，69，767.下列哪一条不属于数据库设计的任务?( )（分数：2.00）A.设计数据库应用结构B.设计数据库概论结构C.设计数据库逻辑结构D.设计数据库物理结构8.数据库技术的根本目标是( )。（分数：2.0

4、0）A.数据存储B.数据共享C.数据查询D.数据管理9.需求分析阶段的任务是( )。（分数：2.00）A.软件开发方法B.软件开发工具C.软件开发费用D.软件系统功能10.关系数据库管理系统能实现的专门关系运算包括( )。（分数：2.00）A.排序、索引、统计B.选择、投影、连接C.关联、更新、排序D.显示、打印、制表11.数据管理技术发展的三个阶段中，( )没有专门的软件对数据进行管理。 I人工管理阶段 文件系统阶段 数据库阶段（分数：2.00）A.仅 IB.仅C.I 和D.II 和12.在新建一个 VB 工程时，将新建窗体的 Name 属性设置为 TheFirst，则默认的窗体文件名为(

5、)。（分数：2.00）A.Form1frmB.工程 1frmC.TheFirstfrmD.Form1vbp13.要建立一个随机文件记录学生的信息，如下定义的学生记录类型，由学号、姓名和 5 门课程成绩(百分制)组成，下列的定义正确的是( )。（分数：2.00）A.Type stu no As Integer name As String score(1 To 5)As Single End TypeB.Type stu no As Integer name As String*10 score()As Single End TypeC.Type stu no As Integer name A

6、s String*10 score(1 To 5)As Single End TypeD.Type stu no As Integer name As String score()As Single End Type14.关于变量作用域，下列叙述中错误的是( )。（分数：2.00）A.在窗体的 Form_Load 事件过程中定义的变量不是全局变量B.在某个 Sub 过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程C.在调用过程中，所有局部变量被系统初始化为 0 或空字符串D.局部变量的作用域不可以超出所定义的过程15.运行以下程序后，输出的图案是( )。 Fo

7、rmlCls A$=String$(10，“*”) For i=1 To 5 n=10-2*i X$=A$:Y$=SpaceS(n) Mid$(X$，i+1，n)=Y$ PrintX$ Next i（分数：2.00）A.* * * * * * * * *B.* * * * *C.* * * * *D.* * * * *16.可设置文字字体为斜体的属性是( )。（分数：2.00）A.FontSlopeB.FontBoldC.FontltalicD.FontUnderdine17.下列表达式的值为 2123 的是( )。（分数：2.00）A.Val(“123asd”)&2000B.Val(“123

8、asd”)+2000C.Str(i23)&“2000”D.Str(123)+“2000”18.已知变量 x、y 为整数型，且 x=4，y=12，s 为字符串型，且 s=a，LblOk 为标签控件，下列赋值语句不合法的是( )。（分数：2.00）A.x=LblOkCaptionB.LblOkcaption=Str(x)C.x*3=yD.y=X*S19.已知 A$=“Welcome”，下列语句操作能够正确执行的是( )。（分数：2.00）A.LabellHeight=A$B.LabellCaption=A$C.LabellEnabled=A$D.LabellVisible=A$20.在窗体上有一个

9、文本框 Text1 和一个标签 Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图所示)，则空白处应填入的内容是( )。 （分数：2.00）A.GetFocusB.ClickC.ChangeD.LostFocus21.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Commandl_Click() PicturelPicture=LoadPicture(“c:picturejpg”) PicturelCls PicturelPrint“picture” End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 pict

10、ureB.窗体上出现 picture 文奉，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picturejpgD.窗体无显示，图片框只显示 picture 文字22.下列控件属性中，属性值的类型不相同的一项是( )。（分数：2.00）A.Label 控件的 Enabled 属性与 TextBox 控件的 Enabled 属性B.OptionButton 控件的 Value 属性与 CheckBox 控件的 Value 属性C.Command 控件的 Default 属性与 Command 控件的 Cancel 属性D.Command 控件的 Visible 属性与 Fram

11、e 控件的 Visible 属性23.有以下程序段，单击 Commandl 按钮后，屏幕上的输出结果是( )。 Private Sub Commandl_Click() For i=6 To 9 Print Tab(i*i)，i Nexti End Sub（分数：2.00）A.6 7 8 9B.6 7 8 9C.6 7 8 9D.6 7 8 924.下列程序执行后，变量 a 的值为( )。 Dim a，b，C，d As Single a=10:b=20:c=40 Ifba Then d=a:a=b:b=d EndIf If ca Then d=a:a=c:c=d End If If cb Th

12、en d=b:b=c:c=d End If（分数：2.00）A.10B.40C.20D.10025.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每 1s 在文本框中显示一次当前的时间。 （分数：2.00）A.EnabledB.VisibleC.Timer()D.Interval26.在窗体上画 1 个名称为 Cornmandl 的命令按钮，并编写以下程序： Private Sub Commandl_Click() Print fun(“ABCDEFG”) End Sub Function fun(st As String)As String s

13、tlen=Len(st) temp=“” For k=1 To stlen2 temp=temp+Mid(st，k，1)+Mid(st，stlen-k+1，1) Next k fun=temp End Function 程序运行时，单击命令按钮，则在窗体上显示的是( )。（分数：2.00）A.ABCDEFGB.AGBFCEC.GFEDCBAD.AGBFCED27.下面是求最大公约数的函数的首部( )。 Function fun(By Val x As Integer，ByVal y As Integer)As Integer 若要输出 8、12、16 这 3 个数的最大公约数，下面正确的语句是

14、（分数：2.00）A.Print fun(8，12)，fun(12，16)，fun(16，8)B.Print fun(8，12，16)C.printfun(8，12)，fun(12，16)，fun(16)D.Printfun(8，fun(12，16)28.窗体上有 Text1、Text2 两个文本框及一个命令按钮 Commandl，编写下列程序： Dim y As Integer Private Sub Commandl _Click() Dim x As Integer x=2 Text1Text=p2(p1(x)，y):Text2Text=p1(x) End Sub Private Fun

15、ction p1(x As Integer)As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p2(x As Integer，y As Integer)As Integer p2=2*x+yEnd Function 程序运行后，第一次单击和第二次单击命令按钮后，文本框 Text1 和 Text2 内的值分别是( )。（分数：2.00）A.2 4 2 4B.2 4 4 8C.10 10 58 58D.4 4 8 829.单击命令按钮执行以下程序，输出结果为( )。 Private Sub Commandl Click() Dim

16、x As Integer,y As Integer x=12:y=32 Call Proc(x，y) Printx；y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub（分数：2.00）A.12 32B.2 32C.2 3D.12 330.在窗体上有一个文本框 Text1，Text 属性值为空，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String，n As Integer

17、 str=UCase(Chr(KeyAscii) n=Len(str) Text1Text=String(n，str) End Sub 程序运行后，如果在文本框中输入字母“P”，则在文本框中显示的内容为( )。（分数：2.00）A.PPB.pPC.PPD.Pp31.在窗体上画一个命令按钮，然后编写如下代码： Private Sub Commandl_Click() Dim MaxSize，NextChar,MyChar Open“d:tempfemaletxt”For Input As#1 MaxSize=LOF(1) For NextChar=MaxSize To 1 Step-1 Seek

18、#1NextChar MyChar=Input(1，#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后，单击命令按钮，其输出结果为( )。（分数：2.00）A.TrueB.FalseC.0D.Null32.使用菜单编辑器设计菜单时，必须输入的项是( )。（分数：2.00）A.快捷键B.标题C.索引D.名称33.假定通用对话框的名称为 CD1，命令按钮的名称为 Commandl，则单击命令按钮后，能使打开对话框的标题为“通用对话框”的事件过程是( )。（分数：2.00）A.Private Sub Commandl_Click() CD1Di

19、alogTitle=“通用对话框” CD1ShowPrinter End SubB.Private Sub Commandl_Click() CD1DialogTitle=“通用对话框” CD1ShowFont End SubC.Private Sub Commandl_Click() CD1DialogTitle=“通用对话框” CD1ShowOpen End SubD.Private Sub Commandl_Click() CD1DialogTitle=“通用对话框” CD1ShowColor End Sub34.在窗体上有 2 个图片框，名称分别为 Picture1 和 Picture

20、2，Picture2 中添加了香蕉图片 (见图 1)，且将 Picture2DragMode 属性设置为 1。要求程序运行时，可以用鼠标把 Picture2 拖拽到 Picture1 中(见图 2)。以下可以实现此功能的事件过程是( )。 （分数：2.00）A.Private Sub Form_pragDrop(Source As Control，X As Single，Y As Single) Picture2Move Picture1Left+X，Picture1Top+Y End SubB.Private Sub Picture2_DragDrop(Source As Control，X

21、 As Single，Y As Single) SourceMove Picture1Left+X，Picture 1Top+Y End SubC.Private Sub Picture1_DragDrop(Source As Control，X As Single，Y As Single) SourceMove Picture1Left+X，Picture1Top+Y End SubD.Private Sub Picture1 DragDrop(Source As Control，X As Single，Y As Single) Picture2Move Picture2Left+X，Pic

22、ture2Top+Y End Sub35.目录列表框的 Path 属性的作用是( )。（分数：2.00）A.显示当前驱动器或指定驱动器上的目录结构B.显示当前驱动器或指定驱动器上的某目录下的文件名C.显示根目录下的文件名D.显示该路径下的文件36.以下叙述中错误的是( )。（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Private 定义的通用过程能被其他窗体调用C.全局变量必须在标准模块中定义D.在设计 VB 程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件二、填空题(总题数：11，分数：22.00)37.填空题（每空）请将每一个空的正确答案写在

23、答题卡上。注意：以命令关键字填空的必须拼写完整。（分数：2.00）_38.在 E-R 图中，矩形表示 1。（分数：2.00）填空项 1:_39.符合结构化原则的三种基本控制结构是顺序结构、 1 和循环结构。（分数：2.00）填空项 1:_40.在面向对象方法中，类的实例称为 1。（分数：2.00）填空项 1:_41.队列是限定在表的一端进行插入和在另一端进行删除操作的线性表。允许删除的一端称作 1。（分数：2.00）填空项 1:_42.在关系模型中，若属性 A 是关系 R 的主码，属性 A 的取值不能为空，称为 1 约束。（分数：2.00）填空项 1:_43.设有一个有 10 个元素的数组，下

24、列程序将该数组的第 1 个元素与第 10 个元素交换，第 2 个元素与第9 个元素交换，第 5 个元素与第 6 个元素交换，请填空。 Private Sub Commandl_Click() Dim a(1 To 10)As Integer Dim i As Integer Dim p As Integer Dim t As Integer Dim j As Integer For i=1 To 10 a(i)=i Next i Forj=1 To 5 t=a(j) 1 2 Nextj For i=1 To 10 Print a(i) NextiEnd Sub（分数：2.00）填空项 1:_填

25、空项 1:_44.过程(Sub)和函数(Function)中， 1 可以有返回值。（分数：2.00）填空项 1:_45.为了实现鼠标自动拖放，必须把 1 属性设置为 2；而为了执行手动拖放，必须把该属性设置为 3。（分数：2.00）填空项 1:_46.在窗体上有一个名称为 Text1 的文本框，有 3 个单选按钮，这 3 个单选按钮构成一个控件数组，名称为 Option1。要求程序执行时，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮执行更改，如图所示。请填空。 （分数：2.00）填空项 1:_填空项 1:_47.下面程序的功能是将一个一维数组中的元素循环向右移动，每次移位次数由

26、文本框 Text 中的输入决定。例如，数组各元素的值依次为 0，1，2，3，4，5，6，7，8，9，10；移动 3 次后，各元素的值依次为8,9，10，0，1，2，3，4，5，6，7。请将程序补充完整。 Private Sub MoveRight(x() As Integer) Dim i As Integer,j As Integer,k As Integer i=UBound(x) j=x(i) Fork=iTo 1Step-1 2 Next k x(LBound(x)=J End Sub Private Sub Commandl_Click() Dim aAs Integer Dim i

27、As Integer,j As Integer,k As Integer For i=0 To 10 a(i)=i Next i j=Val(Text1Text) k=0 Do k=k+1 Call MoveRight(a) LoopUntilk=j For i=0 To 10 Print a(i)； Nexti End Sub（分数：2.00）填空项 1:_填空项 1:_VB 笔试-试卷 28 答案解析(总分：94.00，做题时间：90 分钟)一、选择题(总题数：36，分数：72.00)1.选择题（）下列各题 A、B、C、D 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置

28、上。（分数：2.00）_解析：2.在关系代数运算中，有 5 种基本运算，它们是( )。（分数：2.00）A.并()、差(-)、交()、除()和笛卡儿积()B.并()、差(-)、交()、投影()和选择()C.并()、交()、投影()、选择()和笛卡儿积()D.并()、差(-)、投影()、选择()和笛卡儿积() 解析：解析：并、差、笛卡儿积、投影和选择是 5 种基本的运算，其他运算即交、连接和除，均可以通过5 种基本的运算来表达。3.在数据库系统的组织结构中，下列( )映射把用户数据库与概念数据库联系了起来。（分数：2.00）A.外模式模式 B.内模式外模式C.模式内模式D.内模式模式解析：解析：

29、数据库有两层映像，即外模式模式和模式内模式映像。模式内模式映像定义数据库全局逻辑结构与存储结构之间的对应关系。4.下列关于线性链表的描述中，正确的是( )。 I、只含有一个指针域来存放下一个元素地址 、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件) 、结点由两部分组成：数据域和指针域。（分数：2.00）A.仅 I、B.仅 I、C.仅、D.全部 解析：解析：在定义的链表中，若只含有一个指针域来存放下一个元素地址，称这样的链表为单链表或线性链表。 在链式存储方式中，要求每个结点由两部分组成：一部分用于存放数据元素值，称为数据域：另一部分用于存放指针，称为指针域。其中指针用于指向该

30、结点的前一个或后一个结点(即前件或后件1。5.下面关于数据库三级模式结构的叙述中，正确的是( )。（分数：2.00）A.内模式可以有多个，外模式和模式只有一个B.外模式可以有多个，内模式和模式只有一个 C.内模式只有一个，模式和外模式可以有多个D.模式只有一个，外模式和内模式可以有多个解析：解析：数据库的三级模式结构是指数据库系统的外模式、模式和内模式。一个数据库可以有多个外模式，但只有一个模式和一个内模式。6.设有关键码序列(66，13，5l，76，81，26，57，69，23)，要按关键码值递增的次序排序，若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为( )。（分数

31、：2.00）A.23，13，51，57，66，26，81，69，76 B.13，23，26，51，57，66，81，76，69C.23，13，51，57，26，66，81，69，76D.23，13，51，57，81，26，66，69，76解析：解析：快速排序是起泡排序的改进。在快速排序中，任取一个记录，以它为基准用交换的方法将所有的记录分成两部分，关键码值比它小的在一部分，关键码值比它大的在另一部分，再分别对两个部分实施上述过程，一直重复到排序完成。7.下列哪一条不属于数据库设计的任务?( )（分数：2.00）A.设计数据库应用结构 B.设计数据库概论结构C.设计数据库逻辑结构D.设计数据库物

32、理结构解析：解析：数据库设计工作量大而且过程复杂，既是一项数据库工程也是一项庞大的软件工程。考虑数据库及其应用系统开发全过程，将数据库设计分为以下 6 个阶段：需求分析、概念结构设计、逻辑结构设计、物理结构设计、数据库实施和数据库的运行和维护。8.数据库技术的根本目标是( )。（分数：2.00）A.数据存储B.数据共享 C.数据查询D.数据管理解析：解析：数据库是长期储存在计算机内、有组织的、可共享的大量数据的集合，它具有统一的结构形式并存放于统一的存储介质内，是多种应用数据的集成，并可被各个应用程序所共享，所以数据库技术的根本目标是解决数据共享问题。9.需求分析阶段的任务是( )。（分数：2

33、.00）A.软件开发方法B.软件开发工具C.软件开发费用D.软件系统功能 解析：解析：需求分析是软件定义时期的最后一个阶段，它的基本任务就是详细调查现实世界要处理的对象，充分了解原系统的工作概况，明确用户的各种需求，然后在这些基础上确定新系统的功能。10.关系数据库管理系统能实现的专门关系运算包括( )。（分数：2.00）A.排序、索引、统计B.选择、投影、连接 C.关联、更新、排序D.显示、打印、制表解析：解析：关系数据库管理系统的专门关系运算包括选择运算、投影运算和连接运算。11.数据管理技术发展的三个阶段中，( )没有专门的软件对数据进行管理。 I人工管理阶段 文件系统阶段 数据库阶段（

34、分数：2.00）A.仅 I B.仅C.I 和D.II 和解析：解析：数据管理技术发展的三个阶段中，只有人工管理阶段，没有操作系统，没有管理数据的软件，数据处理方式是批处理。在文件系统阶段，操作系统中已经有了专门数据管理软件，一般称为文件系统。在数据库系统阶段，出现了统一管理数据的专门软件系统，即数据库管理系统。12.在新建一个 VB 工程时，将新建窗体的 Name 属性设置为 TheFirst，则默认的窗体文件名为( )。（分数：2.00）A.Form1frmB.工程 1frmC.TheFirstfrm D.Form1vbp解析：解析：本题考查窗体的命名。窗体文件的扩展名是frm，新建工程时默

35、认的工程名为“工程1vbp”，默认的窗体名为窗体的 Name 属性，这里为“TheFistfrm”。13.要建立一个随机文件记录学生的信息，如下定义的学生记录类型，由学号、姓名和 5 门课程成绩(百分制)组成，下列的定义正确的是( )。（分数：2.00）A.Type stu no As Integer name As String score(1 To 5)As Single End TypeB.Type stu no As Integer name As String*10 score()As Single End TypeC.Type stu no As Integer name As S

36、tring*10 score(1 To 5)As Single End Type D.Type stu no As Integer name As String score()As Single End Type解析：解析：本题考查自定义类型。自定义类型定义的关键字为 Type，自定义类型中的成员类型可以为字符串，但只能是定长字符串；也可以是数组类型，但必须为静态数组。14.关于变量作用域，下列叙述中错误的是( )。（分数：2.00）A.在窗体的 Form_Load 事件过程中定义的变量不是全局变量B.在某个 Sub 过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于

37、该过程C.在调用过程中，所有局部变量被系统初始化为 0 或空字符串 D.局部变量的作用域不可以超出所定义的过程解析：解析：本题考查变量的作用域。局部变量是在过程内声明的变量，只能在本过程中使用，不同过程的局部变量可以重名，由 Dim 或者 Private 声明的局部变量，在过程调用前才会被初始化为 0 或空字符串，静态局部变量不会被初始化为 0 或空字符串；全局变量是在“通用声明”段中用 Public 语句声明的变量，可被本应用程序的任何过程或函数访问。15.运行以下程序后，输出的图案是( )。 FormlCls A$=String$(10，“*”) For i=1 To 5 n=10-2*i

38、 X$=A$:Y$=SpaceS(n) Mid$(X$，i+1，n)=Y$ PrintX$ Next i（分数：2.00）A.* * * * * * * * * B.* * * * *C.* * * * *D.* * * * *解析：解析：本题考查循环程序的分析。本程序首先在字符串 A 中存放 10 个“*”号。指定循环输出 5 行；每次循环输出第 i 行时，把字符串中从 i+1 开始的 n 个字符替换成 n 个空格。根据“n=10-2*i”语句，n的变化为 8、6、4、2、0。16.可设置文字字体为斜体的属性是( )。（分数：2.00）A.FontSlopeB.FontBoldC.Fontl

39、talic D.FontUnderdine解析：解析：与字体有关的属性有：字体类型属性 FontName，字体大小属性 FontSize，粗体字属性FontBold，斜体字属性 FontItalic，加删除线字属性 FontStrikethru，加下划线(即底线)属性FontUnderline。17.下列表达式的值为 2123 的是( )。（分数：2.00）A.Val(“123asd”)&2000B.Val(“123asd”)+2000 C.Str(i23)&“2000”D.Str(123)+“2000”解析：解析：本题考查系统函数和字符串连接运算符。Val 的功能是把从头开始的连续数字串转化

40、成数字。而 Str 的功能是把数字转化为字符。当操作数为字符串时，运算符“+”表示对字符串进行连接运算，否则为加法运算。因此选项 A 为 1 232 000，选项 B 为 2123，选项 C 和 D 全部为 1 232 000。18.已知变量 x、y 为整数型，且 x=4，y=12，s 为字符串型，且 s=a，LblOk 为标签控件，下列赋值语句不合法的是( )。（分数：2.00）A.x=LblOkCaptionB.LblOkcaption=Str(x)C.x*3=y D.y=X*S解析：解析：本题考查标签控件的属性。标签控件 Caption 属性值为字符串，赋值表达式要求赋值号左边必须是变量

41、，不能出现表达式。19.已知 A$=“Welcome”，下列语句操作能够正确执行的是( )。（分数：2.00）A.LabellHeight=A$B.LabellCaption=A$ C.LabellEnabled=A$D.LabellVisible=A$解析：解析：本题考查标签的各种属性。标签的 Height 属性值为数值型，不能赋字符串型值，而Enabled 和 Visible 为布尔型，只有 Caption 属性值为字符串型。20.在窗体上有一个文本框 Text1 和一个标签 Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图所示)，则空白处应填入的内容是( )。 （

42、分数：2.00）A.GetFocusB.ClickC.Change D.LostFocus解析：解析：本题考查文本框的事件。文本框的 GetFocus 事件为文本框获得焦点时触发一次，而单击文本框时触发一次 Click 事件，change 事件是每次文本框中的文本发生改变时触发的事件，而 LostFocus事件是文本框失去焦点时触发的事件。21.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Commandl_Click() PicturelPicture=LoadPicture(“c:picturejpg”) PicturelCls Picturel

43、Print“picture” End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 picture B.窗体上出现 picture 文奉，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picturejpgD.窗体无显示，图片框只显示 picture 文字解析：解析：本题考查图片框属性。单击命令按钮时，图片框首先装入图片，然后图片框清空(注意，该方法只能清空在图片框中输出的文本信息和绘图信息，而不能清除有 LoadPicture 函数装载的图片)，最后图片框显示图片和“picture”文字。全部操作都是在图片框中进行的，窗体上没有任何显示。22.下列控件属性中

44、，属性值的类型不相同的一项是( )。（分数：2.00）A.Label 控件的 Enabled 属性与 TextBox 控件的 Enabled 属性B.OptionButton 控件的 Value 属性与 CheckBox 控件的 Value 属性 C.Command 控件的 Default 属性与 Command 控件的 Cancel 属性D.Command 控件的 Visible 属性与 Frame 控件的 Visible 属性解析：解析：本题考查各种控件的常见属性。控件的 Enabled 属性值都是一致的，分别为 True 和False，表示控件是否可用。单选按钮和复选框的 Value 属

45、性值不同，单选按钮 Value 有 True 和 False 两种，分别表示选中和没有选中，而复选框的 Value 属性表示了复选框的 3 种状态。命令按钮的 Default 属性和 Cancel 属性值为布尔型。任何控件的 Visible 属性值都是同义的。23.有以下程序段，单击 Commandl 按钮后，屏幕上的输出结果是( )。 Private Sub Commandl_Click() For i=6 To 9 Print Tab(i*i)，i Nexti End Sub（分数：2.00）A.6 7 8 9B.6 7 8 9C.6 7 8 9D.6 7 8 9 解析：解析：本题考查 p

46、rint 方法。print 方法可以在窗体、图片框、打印机(Printer)或立即窗口中输出信息。如果两个输出项之间以逗号分隔，那么下一项的输出光标定位在下一个打印区的开始位置处。而Tab(i*i)函数表示光标从左端开始右移 i*i 列。24.下列程序执行后，变量 a 的值为( )。 Dim a，b，C，d As Single a=10:b=20:c=40 Ifba Then d=a:a=b:b=d EndIf If ca Then d=a:a=c:c=d End If If cb Then d=b:b=c:c=d End If（分数：2.00）A.10B.40 C.20D.100解析：解析：

47、本题考查选择语句。程序段中包括 3 条选择语句，其作用分别为：如果 a 小于 b 那么交换 a和 b，如果 a 小于 c 那么交换 a 和 c，如果 b 小于 c 那么交换 b 和 c，相当于对 a、b、c 做了降序排列。25.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每 1s 在文本框中显示一次当前的时间。 （分数：2.00）A.EnabledB.VisibleC.Timer() D.Interval解析：解析：本题考查计时器控件。计时器控件只有一个事件，就是 Timer()事件，表示触发计时器控件时执行的操作。26.在窗体上画 1 个名称为 Cornmandl 的命令按钮