图1－1
图1－2
二、简单应用题
下面出现的“考生文件夹”均为c：＼wexam\\20060001。
1．在考生文件夹中有工程文件kt3.vbp及其窗体文件kt3.frm，该程序是不完整的，请在有“?”号的地方填入正确内容，然后删除“?”及所有注释符(即“'’号)，但不能修改其他部分。保存时不得改变文件名和文件夹。 本题描述如下：
在窗体上有一个列表框，名称为List1；一个文本框，名称为Text1；一个命令按钮，名称为Cl，标题为“复制”。要求程序运行后，在列表框中自动建立4个列表项，分别为Item1、Item2、Item3和Item4。如果选择列表框中的一项，单击“复制”按钮，就可以把该项复制到文本框中，如图1－3所示。
下面出现的“考生文件夹”均为c：＼wexamk20060001。
在考生文件夹中有工程文件kt5.vbp及其窗体文件kt5.frm，该程序是不完整的，请在有“?”号的地方填入正确内容，然后删除“?”及所有注释符(即“'”号)，但不能修改其他部分。
本题描述如下：在名称为Form1的窗体上有两个单选按钮，名称分别为Opt1和opt2，标题分别为“100～200之间素数”和“200～400之间素数”；一个文本框，名称为Text1；两个命令按钮，其名称分别为Cmd1和Cmd2，标题分别为“计算”和“存盘”，如图1－5所示。程序运行后，如果选中一个单选按钮并单击“计算”按钮，则计算出该单选按钮标题所指明的所有素数之和，并在文本框中显示出来。如果单击“存盘”按钮，则把计算结果存入out.txt文件中，该文件必须放在考生文件夹中(在考生文件夹中有标准模块mode．bas，其中的putdata过程可以把结果存入指定的文件，而isprime函数可以判断整数X是否为索数，如果是素数，则函数返回True，否则返回False，考生可以将该模块文件添加到自己的工程中)。
图1－5 注意：必须把素数之和存入考生文件夹下的out．txt文件中，否则没有成绩。保存程序时必须存放在考生文件夹下，窗体文件名为kt5.frm，工程文件名为kt5.vbp。 一、基本操作题 标题 文件 打开 关闭 退出 帮助 vbFile vbOpen vbClose vbExit vbHelp O 1 1 1 0 名称 内缩符号
图1-3
2．在考生文件夹中有工程文件kt4.vbp及其窗体文件kt4.frm，该程序是不完整的，请在有“?”号的地方填入正确内容，然后删除“?”及所有注释符(即“'”号)，但不能修改其他部分。保存时不得改变文件名和文件夹。 在窗体上有三个复选框，名称分别为Ch1、Ch2和Ch3，标题分别为“体育”、“音乐”和“美术”，还有一个命令按钮，名称为c1，标题为“显示”。要求程序运行后，如果选中某个复选框，当单击“显示”命令按钮时，则显示相应的信息。例如，如果选中“体育”和“美术”复选框，单击“显示”命令按钮后，在窗体上显示“我的爱好是体育美术”，如图1－4所示。
(3)按要求设计含有“文件”和“帮助”的菜单栏。 (4)为“文件”菜单设计“打开”、“关闭”和“退出”三个子菜单项。 (5)设计完成之后，按规定方式存盘。 2．【解析】单击命令按钮触发Click事件，命令按钮的标题由其Caption属性设置；在窗体上打印信息通 图1-4
三、综合应用题
1
过Print方法来实现。 【解题步骤】 (1)建立界面和控件并设置控件属性。程序中用到的控件及其属性见表1－2。 表1－2 控件 Name Cmd1 喜欢 按钮 Name Caption Cmd2 不喜欢 属性 设置值 控件 属性 设置值 (3)进入代码窗口，得到如下程序代码： 按钮 Caption (2)编写程序代码。 参考代码： Private Sub Cmd1_Click() Print“数理化” End Sub (3)调试并运行程序。 (4)按题目要求存盘。 Private Sub Cmd2_C1ick() Print“政史地” End SUb 二、简单应用题 1．【解析】本题考查的是列表框控件List的使用。向列表框中添加项目可以用AddItem方法，也可以在属性窗口中进行。 但题目中要求是程序运行后自动添加，所以利用代码实现。 (1)首先按要求打开给定工程文件kt3.vbp及其窗体文件kt3.frm。 (2)在窗体上建立控件并设置控件属性。程序中用到的控件及属性设置见表1-3。 表1－3 控件 列表框 Name 文本框 Name List1 Text1 Name C1 复制 属性 设置值 控件 属性 设置值 (4)For语句循环变量的起始值为0。 (5)列表框的Text属性为最后一次选中的表项的文本 (6)修改这两处的代码。 参考代码如下： (7)调试并运行。 (8)按题目要求存盘。 2．【解析】本题主要考查复选框的使用。单击命令按钮触发Click事件，程序中需要检测复选按钮的状态，可以通过Value属性来实现。如果复选按钮被选中，则Value值为1，否则Value值为0。 (1)在窗体上先按要求建立控件，设置控件属性，程序中用到的控件及属性见表1-4。 表1-4 对象 复选按钮 2
Name Caption Ch1 体育 属性 设置值 命令按钮 Caption
复选按钮 复选按钮 标签 按钮 Name Caption Name Caption Caption Name Caption Ch2 音乐 Ch2 美术 爱好 C1 显示 文本框用Text属性来显示计算结果；命令按钮的标题通过Caption属性来设置，单击命令按钮触发Click事件；为了检测单选按钮是否被选中，可以通过检测Value属性来实现，当Value的属性为True时，表示单选按钮被选中，否则未被选中。 (1)建立界面并设置控件属性。题目提供了程序用到的控件及其属性，见表1-5。 表1-5 控件 单选按钮 单选按钮 Name Caption Name Caption Op1 100～200之间素数 Op2 200～400之间素数 属性 设置值 (2)打开代码窗口，程序提供的代码如下：
续表
(3)读懂程序，分析代码。
①通过语句S=”我的爱好是”可知S为字符串，所以应改为：Dim s As String
②由语句：s=s+Chx.Caption可知输出的变量为S，所以应改为：Print S
(4)编写程序代码，整理后可得如下参考代码：
控件 文本框 命令按钮 命令按钮 Name Name Caption Name Caption Text1 Cmd1 计算 Cmd2 存盘 属性 设置值 (2)打开代码窗口，得到程序提供的代码如下：
(5)调试并运行程序。
(6)按题目要求存盘。
三、综合应用题
【解析】本题主要考查的知识点有文本框及选项按钮的使用，在程序代码设计中用到了循环结构设计的思想。素数的判断准则为看该数除了1和其本身之外，还有无其他约数，若有，表示该数不是素数，否则该数为素数。
3
(5)调试并运行程序。 (6)按题目要求存盘。
(3)分析代码，找出答案。
①temp用来存放累加和，所以必须初始化，即：temp＝0
②Text1显示temp的值，所以使用Text1的Text属性，即：Text1.Text=temp
(4)整理代码，标准模块代码内没有错误，得到窗体参考代码如下：
4
因篇幅问题不能全部显示，请点此查看更多更全内容