1、国家二级（ VB）机试模拟试卷 160及答案与解析 一、选择题 1 算法的时间复杂度是指 ( )。 （ A）算法的长度 （ B）执行算法所需要的时间 （ C）算法中的指令条数 （ D）算法执行过程中所需要的基本运算次数 2 以下数据结构中，属于非线性数据结构的是 ( )。 （ A）栈 （ B）线性表 （ C）队列 （ D）二叉树 3 数据结构中，与所使用的计算机无关的是数据的 ( )。 （ A）存储结构 （ B）物理结构 （ C）逻辑结构 （ D）线性结构 4 内聚性是对模块功能强 度的衡量，下列选项中，内聚性较弱的是 ( )。 （ A）顺序内聚 （ B）偶然内聚 （ C）时间内聚 （ D）逻
2、辑内聚 5 在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键，它们称为该表的 ( )。 （ A）连接码 （ B）关系码 （ C）外码 （ D）候选码 6 检查软件产品是否符合需求定义的过程称为 ( )。 （ A）确认测试 （ B）需求测试 （ C）验证测试 （ D）路径测试 7 数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成 。下列图符名标识的图符不属于数据流图合法图符的是 ( )。 （ A）控制流 （ B）加工 （ C）存储文件 （ D）源和潭 8 待排序的关键码序列为 (15， 20， 9， 30， 67， 65， 45， 90)，要按关键
3、码值递增的顺序排序，采取简单选择排序法，第一趟排序后关键码 15被放到第 ( )个位置。 （ A） 2 （ B） 3 （ C） 4 （ D） 5 9 对关系 S和关系 R进行集合运算，结果中既包含关系 S中的所有元组也包含关系 R中的所有元组，这样的集合运算称为 ( )。 （ A）并运算 （ B）交运算 （ C）差运算 （ D）除运算 10 下列选项中，不属于数据管理员 (DBA)职责的是 ( )。 （ A）数据库维护 （ B）数据库设计 （ C）改善系统性能，提高系统效率 （ D）数据类型转换 11 下面的数写成普通十进制数是 ( )。 8 6787E+8 （ A） 86787000 （ B
4、） 867870000 （ C） 8678700 （ D） 8678700000 12 当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的 ( )。 （ A） AutoSize属性 （ B） Resize事件 （ C） AutoRedraw属性 （ D） Stretch属性 13 以下能正确定义数据类型 Systemlnfo的代码是 ( )。 （ A） Type Systemlnfo DiskDrives As String*10 Memory As Long End Type （ B） Type Systemlnfo DiskDrives As String*10 Memory
5、As Long End Systemlnfo （ C） Type Systemlnfo DiskDrives String*10 Memory Long End Type Systemlnfo （ D） Typedef Systemlnfo DiskDrives String*10 Memory Long End Type 14 以下能从字符串 “VisualBasic”中直接取出子字符串 “Basic”的函数是 ( )。 （ A） Lett （ B） Mid （ C） String （ D） Instr 15 设 “A=“87654321“”，则表达式 Val(Leff(A， 4)+Mid(
6、A， 4， 2)的值为 ( )。 （ A） 876543 （ B） 876554 （ C） 8 （ D） 6 16 窗体上命令按钮的事件过程如下： Private Sub Command1_Click() A=“34“： B=“26“： C=“98“ Print B+C+A End Sub 运行程序后，单击命令按钮，输出结果是 ( )。 （ A） 269834 （ B） 269834 （ C） 158 （ D）程序运行出错 17 当窗体最小化时缩小为一个图标，设置这个图标的属性是 ( )。 （ A） Mouselcon （ B） Icon （ C） Picture （ D） MousePoin
7、ter 18 假定窗体上有一个标签，名为 Label1，为了使该标签透明并且没有边框，则正确的属性设置为 ( )。 （ A） Label1 BackStyle=0 Label1 BorderStyle=0 （ B） Label1 BackStyle=1 Label1 BorderStyle=1 （ C） Label1 BackStyle=True Label1 BorderStyle=True （ D） Label1 BackStyle=False Label1 BorderStyrle=False 19 在程序运行时，下面的叙述中正确的是 ( )。 （ A）用鼠标右键单击窗体中无控件的部分，
8、会执行窗体的 Form Load事件过程 （ B）用鼠标左键单击窗体的标题栏，会执行窗体的 Form Click事件过程 （ C）只装入而不显示窗体，也会执行窗体的 Form Load事件过程 （ D）装入窗体后，每次显示该窗体时，都会执行窗体的 Form Click事件过程 20 下面的程序执行完毕后，组合框中数据项的值是 ( )。 Private Sub Form_Click() For i=1To6 Combo1 AddItem i Next i For i=1To3 Combo1 RemoveItem i Next i End Sub （ A） 1 5 6 （ B） 1 3 5 （ C
9、） 4 5 6 （ D） 2 4 6 21 窗体上有 1个名称为 Text1的文本框； 1个名称为 Timer1的计时器控件，其Interva1属性值为 5000， Enabled属性值是 True。 Timed的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer If flag=0Then flag=1 flag=-flag If flag=1Then Text1 ForeColor=&HFF&“&HFF&为红色 Else Text1 ForeColor=&HC000&HC000& 为绿色 End If End Sub 以下叙述
10、中正确的是 ( )。 （ A）每次执行此事件过程时， flag的初始值均为 0 （ B） flag的值只可能取 0或 1 （ C）程序有逻辑错误， Else分支总也不能被执行 （ D）程序执行后，文本框中的文字每 5秒改变一次颜 色 22 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 do Unti1 x=-1 a=InputBox(“请输入 a的值 “) a=Val(a) b=InputBox(“请输入 b的值 “) b=Val(b) x=InputBox(“请输入 x的值 “) x=Val(x) a=a+b+x Loop
11、Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入 5、 4、 3、 2、 1、 -1则输出结果是 ( )。 （ A） 2 （ B） 3 （ C） 14 （ D） 15 23 下列程序的执行结果为 ( )。 A=“5“： B=“6“ A=VaI(A)+Val(B)B=Val(“56“) If A B Then Print A-B Else Print B-A （ A） -45 （ B） 45 （ C） -56 （ D） 0 24 执行下面的程序段后，变量 S的值为 ( )。 S=5 For i=2 6To4 9Step0 6 S=S+1 Next i （ A） 1
12、0 （ B） 8 （ C） 9 （ D） 7 25 数学式子 5+(a+b)2对应的 Visual Basic表达式是 ( )。 （ A） 5+a+b*2 （ B） 5+(a+b)2 （ C） 5+(a+b)*2 （ D） 5+(a+b)*(a+b) 26 假定有以下循环结构 Do Until条件 循环体 Loop 则正确的描述是 ( )。 （ A）如果 “条件 ”是一个为 0的常数，则一次循环体也不执行 （ B）如果 “条件 ”是一个为 0的常数，则至少执行一次循环体 （ C）如果 “条件 ”是一个不为 0的常数，则至少执行一次循环体 （ D）不论 “条件 ”是否为 “真 ”，至少要执行一次
13、循环体 27 某人编写如下函数来判断 a是否为素数，若是，则函数返回 True；否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer， isprime As Boolean If a 2Then isprime=False Else isprime=True k=2 Do While k a 2And isprime If a Mod k=0Then isprime=False Else k=k+1 End If Loop End If prime=isprime End Function 在测试时发现有 1个非素
14、数也被判断为素数，这个错判的数是 ( )。 （ A） 0 （ B） 1 （ C） 4 （ D） 6 28 假定建立了一个名为 Command1的命令按钮数组，则以下说法中错误的是( )。 （ A）数组中每个命令按钮的名称 (名称属性 )均为 Command1 （ B）数组中每个命令按钮的标题 (Caption属性 )都一样 （ C）数组中所有命令按钮可以使用同一个事件过程 （ D）用名称 Commandl(下标 )可以访问数组中的每个命令按钮 29 以下叙述中正确的是 ( )。 （ A）事件过程都由用户来编写 （ B）事件过程都不是由用户编写的 （ C）事件过程有的由用户编写，有的由系统确定
15、（ D）用户可以确定事件方法过程是否由用户编写 30 下面程序执行时，输出的结果是 ( )。 Private Sub Form_Click() Dim i As Integer， j As Integer i=10 Do i=i+j For i=10Toi Step-3 i=i+j Next j Loop While i 50 Print i； j End Sub （ A） 50 10 （ B） 50 9 （ C） 57 10 （ D） 57 9 31 下列不一定是传值的虚实结合方式的选项是 ( )。 （ A）调用过程时实参为表达式 （ B）调用过程时实参为常量 （ C）调用过程时实参为变量名
16、 （ D）调用过程时实参将变量名用括号括起来 32 在窗体上有两个文本框： Text1和 Text2，然后编写如下事件过程： Private Sub Form_Load() Show Text1 Text=“ “： Text2 Text=“ “： Text2 SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer， Shift As Integer) Text1 Text=Text1 Text+Chr(KeyCode-4) End Sub 程序运行后，如果在 Text2文本框中输入 “ertyu”，则 Text1文本框中的内容
17、为( )。 （ A） anpuq （ B） ANPUQ （ C） ERTYU （ D） ertyu 33 下列叙述中错误的是 ( )。 （ A）一个工程中可以含有多个标准模块文件 （ B）以 bas为扩展名的文件是标准模块文件 （ C）窗体文件包含该窗体及其控件的属性 （ D）在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 34 要使菜单项 MenuOne在程序运行时失效，应使用的语句是 ( )。 （ A） MenuOne Visible=True （ B） MenuOne Visible=False （ C） MenuOne Enabled=True （ D） MenuOn
18、e Enabled=False 35 下列程序的功能是调用字体对话框来设置文本框中的字体， 单击 Command1按钮弹出对话框，进行相应的字体、字号等的设置，然后单击 “确定 ”按钮退出对话框，则文本框中将发生哪些变化 ( )。 Private Sub Command1_ClickO() CommonDialog1 CancelError=True CommonDialog1 Flags=3 On Error Resume Next CommonDialog1 ShowFont Text1 Font Name=CommonDialogl Fon （ A） Text1的文字下划线发生变化 （
19、B） Text1的字体发生变化 （ C） Text1的字体和颜色发生变化 （ D）程序出错 36 下面 ( )不是 VB的文件系统控件。 （ A） DriveListBox控件 （ B） DirListBox控件 （ C） FileListBox控件 （ D） ListBox控件 37 下面的程序执行时，将把当前目录下的顺序文件 smtext1 txt的内容读入内存，并在文本框 Text1中显示出来。在横线处应填写 ( )。 Private Sub Command1_Click() Dim inData As String Text1 Text=“ “ Open“ smtext1 txt“_A
20、s#1 Do While_ Input#1 inData Text1Text=Text1 Text&inData Loop Close#1 End Sub （ A） Input(EOF(1) （ B） Input(Not EOF(1) （ C） Append(Not EOF(1) （ D） Append(EOF(1) 38 以下程序的功能是：把父目录下顺序文件 smtext1 txt的内容读入内存，并在文本框 Text3中显示出来。请选择适合横线处的语句 ( )。 Private Sub Command1_Click() Dim inData As String Text3 Text=“ “
21、Open“ smtext1 txt“_As#1 Do While_ Input#1， inData Text3 Text=Text3 Text&inData Loop Close#1 End Sub （ A） For Input Not EOF(1) （ B） For Output EOF(1) （ C） For Append Not EOF(1) （ D） For Random EOF(1) 39 为达到把 a、 b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a =10： b =20 Call swap(a， b) Print a， b
22、End Sub PrivateSub swap(ByVal a As Integer， ByVal b As Integer) c=a： a=b： b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是 ( )。 （ A）调用 swap过程的语句错误，应改为： Call swap a， b （ B）输出语句错误，应改为： Print“a“， “b“ （ C）过程的形式参数有错，应改为： swap(ByRef a As Integer， ByRef b As Integer) （ D） swap中 3条赋值语句的顺序是错误的，应改为 a=b： b=c：
23、 c=a 40 有如下函数过程： Function f1(x As Integer)As Long Dim s As Long， i As Integer s=0 For i=1To x s=s+i Next i f1=s End Function 在窗体上添加一个命令按钮，名为 Command1，并编写事件过程调用该函数，则输出结果为 ( )。 Private Sub Command1_Click() Dim i As Integer， sum As Long For i=1To5 sum=sum+f1(i) Next i Print sum End Sub （ A） 25 （ B） 35
24、（ C） 45 （ D） 55 二、基本操作题 41 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画一个名称为 Image1的图像框，再画一个名称为Command1、标题为 “退出 “的命令按钮。通过属性窗口设置图像框的属性，将考生文件夹下的 pic1 bmp文件加载到图像框，使图片的大小能够随图像框大小而改变。设置命令按钮的属性，使得程序运行时，按回车键即可执行命令按钮的 Click事件过程。窗体外观如图 310所示。注意：存盘时必须存放在考生文件夹下， 工程文件名为 sjt1 vbp，窗体文件名为 sjt1 frm
25、。(2)在名称为 Form1的窗体上画一个名称为 CD1的通用对话框，在属性窗口中设置 CD1的属性，使得打开通用对话框时，其初始路径是 “D： ”。按照表 31设计菜单，窗体外观及菜单如图 311所示。请编写程序，使得运行程序，单击 “打开文件 ”或 “保存文件 ”菜单项时，相应地出现 “打开 ”或 “保存 ”对话框。要求程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为sjt2 frm。 三、简单应用题 42 (1)在考生文件夹中有工程文件 sjt3 vbp，程序界面如图 33所示。当在文本框中输入正整数 N，
26、单击 “计算 ”命令按钮，进行计算。若 N是奇数，计算1+3!+5!+N! ，若 N是偶数，计算 1+3!+5!+(N+1)! 。在给出的窗体文件中已经有了全部控件，但程序不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sit4 vbp，该程序的功能是显示月历。运行程序后，在 Text1、 Text2中分别输入年份和月份，并在左边的框架中选择该年的 1月 1日是星期几，然后单击 “显示月历 ”按钮，即可在下面的图片框内显示该年该月的月历。如图 34所示的是 2008年 2月份
27、的月历。请将事件过程中的注释符去掉，把 “?”改为正确的内容，以实现上述程序功能。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。四、综合应用题 43 为了验证一个正整数 n(n 3)是否为素数，最直观的方法是，看在 2 n 2范围内能否找到一个整数 m将 n整除，若 m存在，则 n不是素数；若找不到 m，则 n为素数。在考生文件夹下有一个工程文件 sjt5 vbp，其窗体上有 1个名称为 Text1的文本框。请根据上面的算法，编写判断一个正整数是否为素数的函数 prime，然后用这个函数找出 200 300之间的所有素数，求出这些素数的和，将该数在文本框中显示出来，
28、并存入文件 out5 txt中。 要求：编写函数 prime的代码，然后在 Form_Click事件过程中调用该函数，并计算素数的和。事件过程中已给出了把素数和保存到文件中的代码，考生不得修改。 注意：请务必把求得的和在文本框中显示出来，这样才能存入文件 out5 txt，否则没有成绩。 国家二级（ VB）机试模拟试卷 160答案与解析 一、选择题 1 【正确答案】 D 【试题解析】 算法的时间复杂度，是指执行算法所需要的工作量，可以川算法在执行过程中所需基本运算的执行次数来度量算法的工作量。 2 【正确答案】 D 【试题解析】 二叉树属丁非线性结构。栈是一种特殊的线性表，这种线性表只能在固定
29、的一端进行插入和删除操作；队列可看作是捅入在一端进行，删除在另一端进行的线性表。 3 【正确答案】 C 【试题解析】 数据的逻辑结构反映的是数据元素之间的逻辑关系，与使用的计算机无关。 4 【正确答案】 B 【试题解析】 内聚是从功能角度来衡量模块的联系，它描述的是模块内的功能联系。内聚有如下种类，它们之间的内聚度南弱到强排列： 偶然内聚 模块中的代码无法定义其不同功能的调用。但它使该模块能执行不同的功能，这种模块为巧合强度模块。 逻辑内聚 这种模块把几种相关的功能组合在一起，每次被调用时，由传送给模块的参数来确定该模块应完成哪一种功能。 时间内聚 这种模块顺序完成一类相火功能，比如初始化 模
30、块，它顺序地为变量置初值。 过程内聚 如果一个模块内的处理元素是相关的，而且必须以特定次序执行，则称为过程内聚。 通信内聚 这种模块除了具有过程内聚的特点外，还有另外一种关系，即它的所有功能都通过使用公用数据而发生联系。 顺序内聚 如果一个模块内各个处理元素和同一个功能密切相关，而且这些处理必须顺序执行，处理元素的输出数据作为下一个处理元素的输入数据，则称为顺序内聚。 功能内聚 如果一个模块包括为完成某一具体任务所必需的所有成分，或者说模块中所有成分结合起来是为了完成一个具体的任务，此模块则为功能 内聚模块。 5 【正确答案】 D 【试题解析】 在关系中凡能惟一标识元组的最小属性集称为该表的键
31、或码。二维表中可能有若干个键，它们称为该表的候选码或候选键。从二维表的所有候选键中选取一个作为用户使用的键称为主键或主码。 6 【正确答案】 A 【试题解析】 确认测试的任务是验证软件的功能和性能，以及其他特性是否满足需求规格说明中确定的各种需求。 7 【正确答案】 A 【试题解析】 数据流图用于抽象描述一个软件的逻辑模型，它由一些特定的图符构成，包括 4个方面，即加工、数据流、存储文 件、源和潭。 8 【正确答案】 B 【试题解析】 选择排序的基本思想是扫描整个线性表，从中选山最小的元素，将它交换到表的最前面，然后对剩下的子表采用同样的方法，直到子表为空。所以第一趟排序后，将选出最小的元素
32、9放在第一个位置，元素 15则放在第 3个位置。 9 【正确答案】 A 【试题解析】 关系的并运算是指，由结构相同的两个关系合并，形成一个新的关系，其中包含两个关系中的所有元组。 10 【正确答案】 D 【试题解析】 数据库管理员 (DataBase Administrator， DBA) 是指对数据库的规划、设计、维护、监视等的人员，其主要工作如下：数据库设计。 DBA的主要仟务之一是数据库设计，具体地说是进行数据模式的设计；数据库维护。 DBA必须对数据库中的数据安全性、完整性、并发控制及系统恢复、数据定期转储等进行实施与维护；改善系统性能，提高系统效率。 DBA必须随时监视数据库的运行状
33、态，不断调整内部结构，使系统保持最佳状态与效率。 11 【正确答案】 B 【试题解析】 浮点数也称为实型数或实数，是带有小数部分的数值。他由 3部分组成：符号、指数及尾数。例如 123 456E3或 123 456E+3的单精度数，这其中的 “123 456”为尾数部分、 “E3”为指数部分 (E为符号， 3为指数 )，相当于123 456乘以 10的 3次幂。本题中是 “E+8”，那么应该是乘以 10的 8次幂，所以选项 B正确。 12 【正确答案】 B 【试题解析】 本题考查窗体的属性和事件。窗体没有 Stretch和 AutoSize属性，窗体的 AutoRedraw是在窗体上画图时受到
34、影响的属性。如果窗体的大小发生改变，要使窗体上各种控件大小也要随之进行改变，应该编写 Resize事件。 13 【正确答案】 A 【试题解析】 本题考查自定义类型的定义。自定义类型要求以 Type开始，以End Type结束，在两者之间包含有各个成员的说叫，要求字符串定义为定长字符串，同时每个成员的类犁以 “As”引出。 14 【正确答案】 B 【试题解析】 本题考查字符串函数。函数 Left表示从字符串的左边取连续个字符构成子串。 Mid可以从字符串的任意位置取出子串。 String则返回字符串的第一个宁符构成的，含有相同个数字符的子串。 Instr为字符串匹配函数。 15 【正确答案】 B
35、 【试题解析】 本题考 查字符串函数。 Mid(A， 4， 2)表示从字符串 A中第 4个字符丌始取 2个字符构成子串： Left(A， 4)表示从 A左边取 4个字符构成子串； Val函数表示将两个字符串连接到一起，构成一个字符串后，将其转化成数值型。 16 【正确答案】 B 【试题解析】 本题考查字符串运算符。 “+”操作与字符串运算时为字符串连接运算符。字符串的输出是不加双引号的，但在程序中表示字符串要加上双引号。 17 【正确答案】 B 【试题解析】 MouseIcon属性用于设置自定义的鼠标图标； Icon属性用于设置窗体最小 化时的图标； Picture属性用于设置在对象中显示一个
36、图形： MousePointer属性用于设置指示在运行时当鼠标移动到对象的一个特定部分时，被显示的鼠标指针的类型。因此本题选项 B正确。 18 【正确答案】 A 【试题解析】 本题考查标签的属性。标签的 BackStyle属性表示标签的背景是否透明 (1表示不透明， 0表示透明 )。标签的 BorderStyle属性表示是否含有边框 (1表示有边框， 0表示没有边框 )。 19 【正确答案】 C 【试题解析】 窗体的 Click(单击 )事件在程序运行时单击 窗体内的某个无其它控件的部位时发生；窗体的 Load(装载 )事件在一个窗体被装载时发生，常用于在程序启动时对属性和变量进行初始化，该条
37、件与窗体是否显示无关。 20 【正确答案】 B 【试题解析】 本题考查组合框的方法。组合框的 Addltcm方法表示把数字 i加入到组合框，而 RemoveItem方法表示把组合框中第 i项移出组合框。因此本题首先依次加入 1、 2、 3、 4、 5、 6；由于组合框下标从 0开始，所以在第二个循环中首先移除第 1项，也就是数字 2，接下来移除第 2项，也就是数字 4，最后移除第 3项也就是数字 6，最后组合框中剩下 1、 3、 5。 21 【正确答案】 D 【试题解析】 计时器控件 (Timer)用来完成有规律性时间间隔执行的任务，Interval属性用于设置计时器事件之间的间隔，以毫秒为单
38、位。 本题在每 5秒执行一次的 Timcr事件过程中，通过静态变量 flag值的交替变换 (即 -1和 1之间 )来控制文本框中义字的颜色，值为 -1时为绿色，值为 1时为红色。除程序刚启动第一次执行 Timer事件过程时，静态变量 flag的初始值为 0外，其余各次均为 -1或 1。 22 【正确答案】 A 【试题解析】 本题 输出变量 a的值，在每次循环时，都对变量 a、 b、 x进行了赋初值，因此只要考虑最后一次循环即可。也就是当输入 a=2， b=1， x=-1时的表达式 “a=a+b+x”的值，也就是最后 a的值为 2，所以选项 A)正确。 23 【正确答案】 A 【试题解析】 本题
39、考查转换函数的操作。 Val函数可以把数字字符串转化成数字，然后进行算术运算。因此最后 A的值为 11，而 B的值为 56，因此输出 A-B的值为 -45。 24 【正确答案】 C 【试题解析】 本题考查 VB中 For循环。 VB中循环变量可以为实数，循环变量的初 值为 2 6，终值为 4 9，步长 0 6。循环的次数为 Int(终值 -初值 )步长 )，所以进行了 4次循环，因此最后 s的值为 9。 25 【正确答案】 C 【试题解析】 本题考查数学式与表达式之间的转化。 VB中一个表达式写在同一行，不可以省略运算符。括号必须成对出现。 26 【正确答案】 B 【试题解析】 本题考查 Do
40、Loop 循环。 DoLoop 循环中，由 Until引出的循环条件，如果条件不成市，也就是条件为 0时执行循环，否则退出。 27 【正确答案】 C 【试题解析】 本题考查循环 的运行。如果输入的数据小于 2，那么肯定不是素数，更改 isprime的值为 False。如果数据大于等于 2，当等于 2时， isprime为True，同时 k a 2不成立， a为 2时为素数，当 a为 4时， k 2不成立，则误判断 4也是素数，因此不符合素数的定义。 28 【正确答案】 B 【试题解析】 本题考查控件数组。命令按钮的控件数组中每个控件的名字相同，标题属性可以设置为不同值，可以使用索引来区别每一个
41、控件，这些控件共享一个事件。 29 【正确答案】 D 【试题解析】 本题考查事件过程。一般控件都 有事件过程，这些事件过程在编写程序时，可以根据问题的需要来确定是否编写该事件过程。 30 【正确答案】 C 【试题解析】 本题考查二层循环的分析。程序段中的循环结构为外循环DoLoop While ，又包括了 For型循环。外循环为直到型循环，先执行循环体，冉判断条件。 i的初值为 10，内循环执行完一次后， i值为 20， j值为 7，此时内层循环变量 j小于 i，内循环结束；执行下一次外循环，此时 i初值为 27，内存循环 i初值为 10，小于终止值，内层循环不执行；以此类推，当 i为 57时
42、，循环结束。 31 【正确 答案】 C 【试题解析】 本题考查函数调用时的参数传递。 VB中默认为传址调用，如果实参为常量，表达式则为传值调用，选项 D)中变量用括号括起来，变成表达式，为传值调用。 32 【正确答案】 B 【试题解析】 本题考查键盘事件参数。在 Text2中按下键盘上的某个按键时，KeyDown事件将发生，其中 KeyDown中的 KeyCode参数是所按键的 ASCII码值，其数据类型为整型，可以对其进行算术运算。 Chr(KeyCode-4)表尔 KeyCode码对应字符前面的第 4个宁符。注意： KeyCode返叫 的总是大写字符。 33 【正确答案】 D 【试题解析】
43、 本题考查工程中的文件。一个 VB工程中包括各种类型的文件，常见的有工程文件，多个窗体文件 ( frm)和多个模块文件 ( bas)，窗体文件中包含窗体及控件的属性设置，窗体级变量等。资源管理器中可以同时管理多个工程文件。 34 【正确答案】 D 【试题解析】 本题考查菜单项的常见属性。菜单项的 Visible属性决定该菜单项在运行中是否可见，而 Enabled为假时，运行时该菜单不可用，因此应更改Enabled属性为 False。 35 【 正确答案】 B 【试题解析】 本题考查通用对话框的属性。 CommonDialog1的 Flags属性值为 3时，出现的字体对话框中没有删除线、下划线、
44、颜色元素，因此利用CommonDialog1不能改变文本框中字体颜色以及删除线和下划线，但是可更改Text1中的字体。 36 【正确答案】 D 【试题解析】 本题考查常见的文件系统控件。常见的文件系统控件有目录列表框、文件列表框和驱动器列表框。 ListBox不是文件系统控件。 37 【正确答案】 B 【试题解析】 本题考查文件的操作。程序 首先要以读文件的方式 (Input)打开文件，题中说明这是个顺序文件，那么如果文件指针没有到文件尾 (EOF(1)的值为False)，就要从文件中读出数据，所以循环条件应以是否到文件尾为依据，判断是否继续循环。 38 【正确答案】 A 【试题解析】 本题考
45、查文件的打开。打开顺序文件的基本格式为： Open FileName For Mode As #FileNumber。其中， FileName表示要打开的文件的路径； Mode为文件打开模式： OutPut用于输出、 Append用于追加写入、 Input用于 读取； FileNumber为打开文件时指定的句柄 (文件号 )。本题中是需要读取顺序文件中的数据，因此打开模式为： Input：当通过 Input#语句读取文件中数据时，为避免程序出错，常以 Not EOF(文件号 )作为循环条件，用于判断是否已到文件结尾。 39 【正确答案】 C 【试题解析】 本题考查参数传递。 VB过程调用中，参
46、数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用 ByVal声明，说明此参数为传值调用：若用 ByRef声明，说明此参数为传址调用；没有说明传递类型，则默认为传址传递 (即形 参的结果会传递给实参 )。本题中为了实现数据的变换，要求进行传址调用，因此形参前面不应用 ByVal声明。 40 【正确答案】 B 【试题解析】 本题考查函数过程的功能分析。函数 f1的主要功能是计算 1到 x的累加和，也就是计算 1+2+x 。在命令按钮的单击事件中循环程序调用了 5次f1函数， sum计算为： 1+1+2+1+2+3+1+2+3+4+1+2+3+4+5。因此结果为 35。 二、基本操作题
47、41 【正确答案】 第 1小题步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中加入一个图像框和命令按 钮。按表 45设置其相关属性。步骤 2：按要求将文件保存至考生文件夹中。第 2小题步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中加入一个通用对话框。按表 46设置其相关属性。步骤 2：利用菜单设计器按表 1在窗体上建立一个菜单，属性设置如表 47所示。步骤 3：在打开的代码编辑窗口中，编写菜单的 Click事件代码。参考代码： Private Sub OpenFile_Click()CD1 ShowOpenEnd SubPrivate Sub SaveFile C
48、lick()CD1 ShowSaveEnd Sub步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 第 1小题：根据题目要求，图像框内加载 pic1 bmp，可以通过图像框的 Picture属性来设置控件中要显示的图片。图像框的 Stretch属性决定了图形框控件是否自动改变大小以显示图片的全部内容，当值为 True，图像可以自动改变大小以显示全部内容；当值为 False时，则不具备图像的自我调节功能。命令按钮的 Default属性设置为 True时，按同车键与单击此命令按钮的作用相同，这个命令按钮也被称为默认按钮。 第 2小题：本题只需按题目要求利用 VB的菜单设计器建立一个菜单，在
49、菜单的事件响应过柙里面按照要求打开通用对话框。 步骤 4：按要求将文件保存至考生文件夹中。 三、简单应用题 42 【正确答案】 第 1小题 步骤 1：打开考生文件夹中的本题工程文件 sit3 vbp，在代码编辑窗口中，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： m=n+1 m=n For i=1To m Step2 sum=sum+f(i) For i=1To x 步骤 2：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在代码编辑窗口中，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： month days(2)=IIf(leap_year(year)， 29， 28) For k=1To month-1 n=0 Private Fun
