1、国家二级（ VB）机试模拟试卷 155及答案与解析 一、选择题 1 在关系代数运算中，有 5种基本运算，它们是 ( )。 （ A）并 ( )、差 (-)、交 ()、除 ()和笛卡儿积 () （ B）并 ( )、差 (-)、交 ()、投影 ()和选择 () （ C）并 ( )、交 ()、投影 ()、选择 ()和笛卡儿积 () （ D）并 ( )、差 (-)、投影 ()、选择 ()和笛卡儿积 () 2 在数据库系统的纰织结构中，下列 ( )映射把用户数据库与概念数据库联系了起来。 （ A）外模式模式 （ B）内 模式外模式 （ C）模式内模式 （ D）内模式模式 3 下列关于线性链表的描述中，正确
2、的是 ( )。 、只含有一个指针域来存放下一个元素地址 、指针域中的指针用于指向该结点的前一个或后一个结点 (即前件或后件 ) 、结点由两部分维成：数据域和指针域。 （ A）仪 、 （ B）仪 、 （ C）仅 、 （ D）全部 4 下面关于数据库三级模式结构的叙述中，正确的是 ( )。 （ A）内模式可以有多个，外模式和模式只有一个 （ B）外模式可以有多个，内模式和模式只有一个 （ C）内模 式只有一个，模式和外模式可以有多个 （ D）模式只有一个，外模式和内模式可以有多个 5 设有关键码序列 (66， 13， 51， 76， 81， 26， 57， 69， 23)，要按关键码值递增的次序排
3、序，若采用快速排序手法，并以第 个元素为划分的基准，那么第一趟划分后的结果为 ( )。 （ A） 23， 13， 51， 57， 66， 26， 81， 69， 76 （ B） 13， 23， 26， 51， 57， 66， 81， 76， 69 （ C） 23， 13， 51， 57， 26， 66， 81， 69， 76 （ D） 23， 13， 51， 57， 81， 26， 66， 69， 76 6 下列哪一条不属于数据库设计的任务 ?( ) （ A）设计数据库应用结构 （ B）设计数据库概论结构 （ C）设计数据库逻辑结构 （ D）设计数据库物理结构 7 数据库技术的根本目标是 (
4、)。 （ A）数据存储 （ B）数据共享 （ C）数据查询 （ D）数据管理 8 需求分析阶段的任务是 ( )。 （ A）软件歼发方法 （ B）软件开发工具 （ C）软件开发费用 （ D）软件系统功能 9 关系数据库管理系统能实现的专门关系运算包括 ( )。 （ A）排序 、索引、统计 （ B）选择、投影、连接 （ C）关联、更新、排序 （ D）显示、打印、制表 10 数据管理技：术发展的三个阶段中， ( )没有专门的软件对数据进行管理。 人工管理阶段 文件系统阶段 数据库阶段 （ A）仅 （ B）仅 （ C） 和 （ D） 和 11 用户在组合框中输入或选择的数据可以通过一个属性获得，这个属
5、性是 ( )。 （ A） List （ B） ListIndex （ C） Text （ D） ListCount 12 下列关于窗体的描述中，错误的是 ( )。 （ A）窗体的 Height、 Width属性用于设置窗体的高和宽 （ B）窗体的 Load事件在加载窗体时发生 （ C）当窗体的 Enabled属性为 False时，通过鼠标和键盘对窗体的操作都被禁止 （ D）执行 UnLoad Form1语句后，窗体 Form1消失，但仍在内存中 13 在窗体上有一个名称为 Command1的命令按钮，并编写有如下事件过程： Private Sub Command1_Click() Move 5
6、00， 500 End Sub 程序执行时，单击命令按钮，实现的功能是 ( )。 （ A）命令按钮移动到距窗体左边界、上边界各 500的位置 （ B）命令按钮向左、上方向各移动 500 （ C）窗体移动到距屏幕左边界、上边界各 500的位置 （ D）窗体向左、上方向各移动 500 14 表达式 Int(8*Sqr(36)*10 (-2)*10+0 5) 10的值是 ( )。 （ A） 0 48 （ B） 0 048 （ C） 0 5 （ D） 0 05 15 在过程定义中， Private表示 ( )。 （ A）此过程可以被其他过程调用 （ B）此过程不可以被任何其他过程调用 （ C）此过程只
7、可以被本工程中的其他过程调用 （ D）此过程只可以被本窗体模块中的其他过程调用 16 为了使标签中的内容居中显示，应把 Alignment属性设置为 ( )。 （ A） 0 （ B） 1 （ C） 2 （ D） 3 17 为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的 ( )属性设置为 True。 （ A） Value （ B） Cancel （ C） Enabled （ D） Default 18 下面叙述不正确的是 ( )。 （ A）对顺序文件中的数据操作只能按一定的顺 序操作 （ B）顺序文件结构简单 （ C）能同时对顺序文件进行读写操作 （ D）顺序文件中只能知道第一
8、个记录的位置 19 假定有以下两个过程： Sub S1(ByVal x As Interger， ByVal y As Interger) Dim t As Interger t=x： x=y： y=t End Sub Sub S2(x As Interger， y As Interger) Dim t As Interger t=x： x=y： y=t End Sub 则以下说法中正确的是 ( )。 （ A） 用过程 S1可以实现交换两个变量的值的操作， S2不能实现 （ B）用过程 S2可以实现交换两个变量的值的操作， S1不能实现 （ C）用过程 S1和 S2都可以实现交换两个变量的值的
9、操作 （ D）用过程 S1和 S2都不能实现交换两个变量的值的操作 20 在窗体中添加一个命令按钮、一个标签和一个文本框，并将文本框的 Text属性置空，编写命令按钮 Command1的 Click事件代码： Private Function fun(x As Long)As Boolean lf x Mod2=0Then fun=True Else fun=False End If End Function Private Sub Command1_Click() Dim n As Long n=Val(Text1 Text) P=IIf(fun(n)， “奇数 “， “偶数 “) Labe
10、l1 Caption=n&“是一个 “&P End Sub 程序运行后，在文本框中输入 20，单击命令按钮后，标签中的内容为 ( )。 （ A） 20是一个奇数 （ B） 20 （ C） 20是一个偶数 （ D） 2 21 下面程序的输出结果是 ( )。 Private Sub Command1_Click() ch$=“ABCDEF“ proc ch Print ch End Sub Private Sub proc(ch As String) s=“ For k=Len(ch)To1Step-1 s=s & Mid(ch， k， 1) Next k ch=s End Sub （ A） AB
11、CDEF （ B） FEDCBA （ C） A （ D） F 22 以下关于 Do UntilLoop 循环的说法正确的是 ( )。 （ A）先进入循环执行语句段落后，再判断是否再进 入循环 （ B）先进入循环执行语句段落后，再判断是否不再进入循环 （ C）执行前先判断是否不满足条件，若不满足才进入循环 （ D）执行前先判断是否不满足条件，若满足才进入循环 23 在窗体上画一个命令按钮，名称为 Command1，然后编写如下程序： Private Sub Command1_Click() For i=1To2 For i=1Toi Print String(i， “Hello“) Nextj
12、Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ( )。 （ A） H HH HH （ B） H （ C） HHHHH HHHH （ D） H HH HHHH 24 下列不能打开工具箱窗口的操作是 ( )。 （ A）执行 “视图 ”菜单中的 “工具箱 ”命令 （ B）按 Alt+F8键 （ C）单击工具栏上的 “工具箱 ”按钮 （ D）按 Alt+V，然后按 Alt+X键 25 下列程序段的执行结果为 ( )。 a=6 For k=1 To 0 a=a+k Next k Print k； a （ A） -1 6 （ B） -1 16 （ C） 1
13、 6 （ D） 11 21 26 窗体上有名为 Text1、 Text2的两个文本框，和一个由 3个单选按钮组成的控件数组 Option1，如图 1所示。程序运行后，如果单击某个单选按钮，则执行 Text1中数值与该单选按钮所对应的运算 (乘 1、乘 10或乘 100)，并将结果显示在 Text2中，如图 2所示。为了实现上述功能，在程序中的横线处应填入的内容是 ( )。Private Sub Option1_Click(_As Integer)IfText1 Text “ “ThenSelect Case_Case0： Text2 Text=Text1 TeXtCase1：Text2 Tex
14、t=Text1 Text*10Case2： Text2 Text=Text1 Text*100End SelectEnd IfEnd Sub （ A） Option1 Index （ B） Index （ C） Option1(Index) （ D） Option1(Index) Value 27 下列程序运行后，输出结果为 ( )。 Sub abcd(ByVal n As Integer) n=n+5 End Sub Private Sub Form_Click() n =3 Call abcd(n ) Print n End Sub （ A） 3 （ B） 4 （ C） 5 （ D） 8
15、28 下列关于通用对话框 CD1的叙述中，错误的是 ( )。 （ A）使用 CD1 ShowColor方法，可显示 “颜色 ”对话框 （ B）显示 “字体 ”对话框前，必须先设置 CD1的 Flags属性，否则会出错 （ C）只要在 “打开 ”对话框中选择了文件，并单击 “打开 ”按钮，即可将选中的文件打开 （ D） CancelError属性用于控制用户单击 “取消 ”按钮关闭对话框 时，是否显示出错警告 29 在窗体上画 1个文本框，名称为 Text1，然后编写如下程序： Private Sub Form_Load() Open“C： dat txt“For Output As #1 Te
16、xt1 Text=“ End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If_=13Then If UCase(Text1 Text=_)Then Close1 End Else Write #1 Text1 Text Text1 Text=“ End If End If End Sub 程序的功能是，在 C盘根目录下建立 1个名为 dat txt的文件，在文本框中输入字符，每次按回车键 (回车符的 ASCII码是 13)都把当前文本框中的内容写入文件dat txt中，并清空文本框中的内容；如果输入 “END”，则结束程序，请选择适
17、合空白处的语句 ( )。 （ A） KevAscii “END“ （ B） Text1 Text “END“ （ C） Text1 Text 13 （ D） KevAscii 13 30 下列 程序的执行结果是 ( )。 Private Sub Form_Activate() Dim score(3)As Integer， total As Integer Dim aa score As Variant score(1)=50： score(2)=14： score(3)=36 total=0： i=0 For Each aa score In score i=i+1 total=total+
18、aascore Print i， aa score， tota1 Next End Sub （ A） 1 0 0 2 50 50 3 14 64 4 36 100 （ B） 1 50 50 2 14 64 3 36 100 （ C） 0 50 50 1 14 64 2 36 100 3 36 100 （ D） 0 0 0 1 50 50 2 14 64 3 36 100 31 在窗体上画一个名为 Command1的命令按钮，编写如下程序： Private Sub Command1_Click() Dim M(10)As Integer For k=1To10 M(k)=12-k Next k
19、x=6 Print M(2+M(x) End Sub 程序运行后，单击命令按钮，输出的结果是 ( )。 （ A） 4 （ B） 5 （ C） 6 （ D） 8 32 要清除已经在图片框 Picture1中打印的字符串而不清除图片框中的图像，应使用语句 ( )。 （ A） Picture1 Cls （ B） Picture1 Picture=LoadPicture(“) （ C） Picture1 Pint“ （ D） Picture1 Picture“ 33 执行以下程序后，在窗体上输出的是 ( )。 Private Sub Command1_Click() Dim a(20) For j=1
20、To20Step2 a(j)=j Next i Print a(1)+a(2)+a(3) End Sub （ A） 4 （ B） 5 （ C） 6 （ D） 7 34 下面程序的运行结果是 ( )。 Private Sub Form_Click() i=0 Do Until0 i=i+1 If i 10Then Exit Do Loop Print i End Sub （ A） 0 （ B） 10 （ C） 11 （ D）出错 35 窗体上有 1个 名为 List1的列表框，其中已经输入了若干个项目 (如图 3所示 )；还有 2个文本框，名称分别为Text1、 Text2， 1个名称为 Com
21、mand1的命令按钮，并有以下程序： Private Sub Command1_Click()Dim str As String， s As String， k As Integers=Text1str=“For k=List1 ListCount-1To0Step-1If InStr(List1 List(k)， s) 0Thenstr=str & List1 List(k)&“ “End IfNext kIf str=“ThenText2=“没有匹配项目 “ElseText2=strEnd IfEnd Sub程序运行时，在 Text1中输入 “京 ”，单击命令按钮，则在 Text2中显示的
22、内容是 ( )。 （ A）京 （ B）北京南京 （ C）南京北京 （ D）没有匹配的项目 36 下面程序运行时，若输入 395，则输出结果是 ( )。 Private Sub Cmd1_Click() Dim a a=InputBox(“请输入一个 3位整数 “) Print a Mo d10， a 100， (a Mod 100) 10 End Sub （ A） 5 9 3 （ B） 3 5 9 （ C） 5 3 9 （ D） 3 9 5 37 设已经在窗体上添加了一个通用对话框控件 CommonDialog1，以下语句正确的是 ( )。 （ A） CommonDialog1 Filter=
23、ALLL Files| *|=|Pictures(* Bmp)|* Bmp （ B） CommonDialog1 Filter=“ALLL Files“|* *|“Pictures(* Bmp)“|*Bmp （ C） CommonDialog1 Filter=ALLL Files|* *|Pictures(* Bmp)|* Bmp （ D） CommonDialog1 Filter=“ALLL Files|* *|Pictures(* Bmp)|* Bmp“ 38 Visual Basic根据计算机访问文件的方式将文件分成 3类，其中不包括 ( )。 （ A）顺序文件 （ B） Unix文件
24、（ C）二进制文件 （ D）随机文件 39 用 Write和 Print语句向文件中写入多个数据的差别在于 ( )。 （ A） Write语句不会自动在数据项之间插入逗号 （ B） Print语句自动在数据项之间插入逗号 （ C） Wrilte语句写入字符串会自动给字符串加上双引号；写入的止数前面没有空格 （ D） Print语句写入字符串会自动给字符串加上双引号；写入的正数前面没有空格 40 窗体上建立了一个名为 CommonDiaIong1的通用对话框，用下面的语句建立一个对话框： CommonDialong1 Action=2，则以下语句与之等价的是 ( )。 （ A） CommonDi
25、alon1 ShowOpen （ B） CommonDialog1 ShowSave （ C） CommonDialog1 ShowColor （ D） CormnonDialog1 ShowFont 二、基本操作题 40 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 41 在名称为 Form1的窗体上画一个名称为 CD1的通用对话框，通过属性窗口设置CD1的初始路径为 C：，默认的文件名为 None，标题为 “保存等级考试 ”，如图2所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名为 sjt1 frm。 42 在名
26、称为 Form1的窗体上设计一个菜单。要求在窗体上添加名为 menu0，标题为 “菜单命令 ”的主菜单，再添加两个名称分别为 “menu1”、 “menu2”，标题分别为“不可用菜单项 ”、 “上一菜单项可用 ”的子菜单，并且使程序运行时， menu1子菜单不可用， menu2子菜单已经选中 (运行时的效果如图 3所示 )。再编写适当的事件过程，使得程序运行时，单击 “上一菜单项可用 ”，则 “不可用菜单项 ”变为黑色 (可用 )。要求程序中不得使用变量，且只有一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为 sit2 vbp，窗体文件名为 sit2 Frm。 三、简单应用题 43
27、考生文件夹中有工程文件 sjt3 vbp。在窗体上有名称为 Comb01的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为 “输入正整数 ”、 “判断 ”的命令按钮。程序运行时在组合框中选中一项，如图 5(a)所示，单击 “输入正整数 ”按钮，通过输入对话框输入一个正整数，再单击 “判断 ”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图 5(b)所示的是输入 56且选中的组合框选项为 “判奇偶数。 ”时 显示的信息框。在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的有关属性，去掉程序中的注释符，把程序中
28、的 ?改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。 44 在考生目录下有一个工程文件 sjt4 vbp。窗体上有 大一小两个名称分别为Shape2、 Shape1的 Shape控件。请在属性窗口中将 Shape1控件设置为圆形，并将其颜色设置为红色 (颜色值为 &H000000FF&)，如图 6所示。要求：当单击窗体时， Shape1移动到矩形 (即 Shape2)左上角，再次单击窗体，则 Shape1移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的 ?改为正确的内容
29、。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 四、综合应用题 45 在考生文件夹下有一个工程文件 sjt5 Vbp，其窗体上画有两个名称分别为Text1、 Text2的文本框，其中 Text1可多行显示。请画两个名称为 Command1、Command2，标题为 “产生数组 ”、 “查找 ”的命令按钮。如图 8所示。程序功能如下： 单击 “产生数组 ”按钮，则用随机函数生成 10个 0 100之间 (不含 0和 100)互不相同的数值，并将它们保存到一维数组 a中，同时也将这 10个数值显示在 Text1文本框内； 单击 “查找 ”按钮将弹出输入对话框，接收用户
30、输入的任意一个数，并在一维数组 a中查找该数，若 查找失败，则在 Text2文本框内显示该数 “不存在于数组中 ”；否则显示该数在数组中的位置。要求：请去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。 国家二级（ VB）机试模拟试卷 155答案与解析 一、选择题 1 【正确答案】 D 【试题解析】 并、差、笛卡儿积、投影和选择是 5种基本的运算，其他运算即交、连接和除，均可以通过 5种基本的运算来表达。 2 【正确答案】 A 【试题解析】 数据库有两层映 像，即外模式模式和模式内模式映像。模式内模式
31、映像定义数据库全局逻辑结构与存储结构之间的对应关系。 3 【正确答案】 D 【试题解析】 在定义的链表中，若只含有一个指针域来存放下一个元素地址，称这样的链表为单链表或线性链表。 在链式存储方式中，要求每个结点由两部分组成：一部分用于存放数据元素值，称为数据域；另一部分用于存放指针，称为指针域。其中指针用于指向该结点的前一个或后一个结点 (即前件或后件 )。 4 【正确答案】 B 【试题解析】 数据库的三级模式结构是指数据库系统的外模式、模式 和内模式。一个数据库可以有多个外模式，但只有一个模式和一个内模式。 5 【正确答案】 A 【试题解析】 快速排序是起泡排序的改进。在快速排序中。任取一个
32、记录，以它为基准用交换的方法将所有的记录分成两部分，关键码值比它小的在一部分，关键码值比它大的在另一部分，再分别对两个部分实施上述过程，一直重复到排序完成。 6 【正确答案】 A 【试题解析】 数据库设计工作量大而且过程复杂，既是一项数据库工程也是一项庞大的软件工程。考虑数据库及其应用系统开发全过程，将数据库设计分为以下 6个阶段：需求分析 、概念结构设计、逻辑结构设计、物理结构设计、数据库实施和数据库的运行和维护。 7 【正确答案】 B 【试题解析】 数据库是长期储存在计算机内、有组织的、可共享的大量数据的集合，它具有统一的结构形式并存放于统一的存储介质内，是多种应用数据的集成，并可被各个应
33、用程序所共享，所以数据库技术的根本目标是解决数据共享问题。 8 【正确答案】 D 【试题解析】 需求分析是软件定义时期的最后一个阶段，它的基本任务就是详细调查现实世界要处理的对象，充分了解原系统的工作概况，明确用户的各种需求，然后在这些 基础上确定新系统的功能。 9 【正确答案】 B 【试题解析】 关系数据库管理系统的专门关系运算包括选择运算、投影运算和连接运算。 10 【正确答案】 A 【试题解析】 数据管理技术发展的三个阶段中，只有人工管理阶段，没有操作系统，没有管理数据的软件，数据处理方式是批处理。在文件系统阶段，操作系统中已经有了专门数据管理软件，一般称为文件系统。在数据库系统阶段，出
34、现了统一管理数据的专门软件系统，即数据库管理系统。 11 【正确答案】 C 【试题解析】 组合框的 List属性用来列出表 项的内容。 List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值，其格式为 列表框 List(下标 )：ListIndex属性的设置值是已选中的表项的位置，表项位置由索引值指定； Text属性值是用户所选择的项目的文本或直接从编辑区输入的文本： ListCount属性属性列出列表框中表项的数量。 12 【正确答案】 D 【试题解析】 本题考查窗体文件的常用属性。窗体的 Height、 Width属性用于设置窗体的高和宽， Left和 Top属性设置窗体在屏幕
35、中的位置， Enabled属性设置为 False时，窗体上所有的控件禁止应用。加载窗体时，自动运行窗体的 Load事件，执行 UnLoad方法以后，可以把当前窗体从内存中移出。 13 【正确答案】 C 【试题解析】 本题考查 Move方法。 Move方法移动窗体或控件，并可改变其大小，具体的格式为： 对象 Move左边距离 ，上边距离 ，宽度 ，高度 ，其中对象可以是除时钟、菜单外的所有控件，省略时默认为窗体。 Move方法的功能是：把对象从当前位置移动到左上角坐标为 (左边距离，上边距离 )的位置，同时根据高度和宽度参数来改变控件的高度和宽度。 14 【正确答案】 C 【试题解析】 本题考查
36、运算符的优先级。首先计算函数调用，算术运算符优先级从高到低为： ()， -、 *、 +-，因此首先计算 sqr(36)，然后计算 ()括号内部的负号和平方运算符，接着计算 *和 +，然后计算 Int取整，最后计算运算符。 15 【正确答案】 D 【试题解析】 本题考查 Private的含义。 Private表示了过程或者变量的访问权限，仅局限于定义的窗体和模块，也就是此过程只可以被本窗体模块中的其他过程调用。 16 【正确答案】 C 【试题解析】 本题考查 Alignment属性。控件的 Alignment属性表示控件中的文字水平对齐方式，属性值可取 3种值： 0为左对齐， l为右对齐， 2为
37、居中。 17 【正确答案】 D 【试题解析】 本题考查控件的常见属性。对于所有具有 Cancel属性的控件，Cancel表示该控件是否当按下 “Esc”键时，执行某个事件过程。 Enabled表示控件是否可以使用，命令按钮的默认属性为 Default，表示当按下回车键的时候，执行某个命令按钮的事件过程。 18 【正确答案】 C 【试题解析】 本题考查顺序文件。 顺序文件中的记录是顺序存放的，但各个记录的长度可以不相同，因此只可以按顺序依次把记录读出来，顺序文件常用于存放文本文件。顺序文件一行一条记录，记录可长可短，以 “换行 ”字符为分隔符号，仅仅知道第一个记录的位置。顺序文件打开一次，只能根
38、据打开模式进行相应的一种操作。 19 【正确答案】 B 【试题解析】 本题考察参数传递知识，在 VB中，参数通过传地址和传值两种方式传送，其中传地址习惯上称为引用，引用方式通过关键字 ByRef来实现，通过该方式传送实参时，可以改变传送过程的变量的值 (当参数引用没有标明引用 方式的关键字时，默认为传地址方式 )；传值就是通过值传送实际参数，它不会改变原来变量的值。 20 【正确答案】 A 【试题解析】 本题考查函数调用以及 IIf函数。 IIf函数可用于执行简单的条件判断操作，其格式为 result=IIf(条件， True部分， False部分 )，其中“result”是函数的返回值， “
39、条件 ”是一个逻辑表达式。当 “条件 ”为真时， IIf函数返回 “True部分 ”的值，而当 “条件 ”为假时返回 “False部分 ”的值。 “True部分 ”或“False部分 ”可以是表达式、变量或其他 函数。函数 fun(n)的功能是判断 n是否为偶数，是偶数则返回 True，否则返回 False。输入 20时， fun返回 True，则Command1的单击事件中 IIf语句得到 “奇数 ”。 21 【正确答案】 B 【试题解析】 本题考查过程调用。过程 proc的功能是：从字符串 ch的最后一个字符开始，依次取出每一个字符，连接到 s中，构成一个新的字符串 (即是实现的字符串的逆
40、置 )。程序运行时单击命令按钮调用函数的时候，实现了字符串“ABCDEF”的逆置。 22 【正确答案】 C 【试题解析】 本题考查 Do UntilLoop 循环的。对于这种循环结构，条件判断在循环体前，因此有可能一次循环体也不运行。在 Until引出的循环条件为 False时执行循环体，条件为 True时退出循环。 23 【正确答案】 A 【试题解析】 本题考查循环嵌套程序分析。外层循环共执行 2次，第一次执行外循环，内层循环变量为 1到 1，执行一次；第二次执行外循环，内层循环变量为 1到 2，执行 2次。 String函数产生 i个 “Hello”中的第一个字符 H。 24 【正确答案】
41、 B 【试题解析】 打开工具箱窗口的操作方法有：执行 “视图 ”菜单中的 “工具箱 ”命令；单击工具栏上的 “工具箱 ”按钮；按 Alt+V，然后按 Alt+X键。 25 【正确答案】 C 【试题解析】 本题考查循环的分析。 For型循环默认的循环变量的步长为 1，由于循环变量的初值大于终值，因此循环体一次也不执行。 26 【正确答案】 B 【试题解析】 本题考查控件数组元素的区分。控件数组由一组相同类型的控件组成。它们共用一个控件名，具有相同的属性，建立时系统给每个元素赋一个惟一的索引号 (Index)，索引号从 0开始。控件数组共享同样的事件过程，通过返回的下 标值区分控件数组中的各个控件
42、。 27 【正确答案】 A 【试题解析】 本题考查子过程的调用时的参数变化。 ByVal是传值调用的关键字，传值调用的时候形参的改变不会影响到实参。 28 【正确答案】 C 【试题解析】 通用对话框 (CommonDialog)提供诸如打开文件 (ShowOpen)、保存文件 (ShowSave)、设置打印选项 (ShowPrinter)、选择颜色和字体 (ShowFont)、显示帮助 (ShowHelp)等操作的一组标准对话框，该控什运行时不可见。当通用对话框显示为 “打开 ”类型时，单击 “打开 ”按钮后其 FileName属性可返回或设置所选文件的路径和文件名，但并不能直接打开该文件。使
43、用显示字体 (Font)对话框之前，必须先设置控件的 Flags属性为 cdlCFBoth、 cdlCFPrinterFonts、cdlCFScrcenFonts这 3个值中的一个。 CancelError属性用于设置当用户选择 “取消 ”按钮时，是否显示错误信息 (默认为否 )。 29 【正确答案】 A 【试题解析】 本题考查 KeyPress事件。在 Text1中输入字符时，将触发 Text1的 KeyPress事件，同时可返回一个 KeyAscii参数 (输入宁符的 ASCII码，区分大小写 )。当 KeyAscii为 13时，表示输入了回车键，此时判断 Text1的文本信息，如果 Te
44、xt1的文本为 “END”，则关闭文件，退出程序。 30 【正确答案】 A 【试题解析】 本题考查 For Each In语句。该语句的使用形式为： For Each成员In数组 Next ，适用于不关心数组中的元素个数或者不清楚有多少个元素，使用时要求成员为变体类型变量。当激活窗体时，对 score数组中的每个元素进行求和，同时 i记下当前计算 数组元素的个数。默认数组下标从 0开始，题中 score数组中含有 4个元素，输出 4行。 31 【正确答案】 A 【试题解析】 本题考查数组中元素的分析。数组中的第 k个元素的值为 12-k，因此 M(6)数据为 6， M(8)为 4。 32 【正
45、确答案】 A 【试题解析】 本题考查常用的方法。 Cls方法的使用形式为： 对象 Cls，作用是清除运行时在窗体或图形框中显示的文本或图形，而不能清除图像。要不清除在设计时的文本，同时也不能清除图形，应用 LoadPicture可以清除或者装入图片。 33 【 正确答案】 A 【试题解析】 本题考查数组元素的赋值。利用循环对数组 a中所有的元素赋值，循环变量的初值为 1，步长为 2。因此数组 a中所有的奇数下标项的值为相应的下标，偶数下标项的值为 0。因此 a(1)+a(2)+a(3)=1+0+3。 34 【正确答案】 C 【试题解析】 本题考查 Do untilLoop 循环的。对于这种循环
46、结构，条件判断在循环体前，因此有可能一次循环体条件也不执行。由 until引出的循环为，当条件为 False时执行循环体；为 True时退出循环。初始时，题中 until后面的条件 为0，因此会一直运行循环体，直到 i大于 10成立，退出循环。 i第一次大于 10的值为 11，因此最后输出 11。 35 【正确答案】 C 【试题解析】 本题考查循环程序的分析以及列表框属性的应用。首先Instr(List1 List(k)， s)语句的作用是在 List1 List(k)中从头开始寻找 s，找不到则返回 0，否则返回 s在 List1 List(k)中的位置。整个循环体的功能是，从列表框中最后一
47、个列表项开始寻找含有与 Text1中输入的字符串相同的子串，如果存在相同的子串，则把 List1 List(k)全部连接到 str中。 36 【正确答案】 C 【试题解析】 VB中常用算术运算符有 8个，其中幂运算符 ( )优先级最高；其次是取负 (-)、乘 (*)、浮点除 ( )、整除 ( )、取模 (Mod)、加 (+)、减 (-)。 37 【正确答案】 D 【试题解析】 本题考查通用对话框的常见属性。通用对话框的 Filter属性用于设置显示文件的类型。使用格式为： CommonDialog1 Filiter=“类型描述 1|类型 |类型描述 2|类型 ” 。 38 【正确答案】 B 【
48、试题解析】 本题考查 VB文 件的分类。 VB中根据文件的访问形式分为顺序文件、随机文件和二进制文件。 39 【正确答案】 C 【试题解析】 本题考查顺序文件的写入命令。顺序文件写入包括 Print和write，写入格式为： writePrint#文件号， 输出列表 。其中， write为紧凑格式，文件的数据项之间插入 “， ”，并要加上双引号。 40 【正确答案】 B 【试题解析】 本题考查通用对话框。系统提供了 6种通用对话框。可以利用其Action值和提供的不同方法来区分不同的对话框。 Action取值可为： 1、 2、 3、4、 5、 6，对应的方法分别为 Showopen、 Show
49、SaVe、 ShowC0lor、 ShowFont、showPrinter、 ShowHelp。 二、基本操作题 41 【正确答案】 操作步骤 步骤 1：新建一个 “标准。 EXE”工程，选择 工程 部件 命令，在弹出的 “部件 ”对话框的列表中选中 “MicroSoft Common DiMog Control6 0”项目，单击 “确定 ”按钮。步骤 2：在窗体 Form1上画一个通用对话框，其相关属性设置如表 127所示。 步骤3：编写 Form1的 Iroad事件，加入 下面的代码： CD1 ShowSave步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 通用对话框的 InitDir属性用于为打开或另存为对话指定初始的目录，
