1、二级 VISUAL+BASIC 机试 3 及答案解析(总分:100.00,做题时间:90 分钟)一、B1 基本操作题/B(总题数:1,分数:30.00)1.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。 请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在窗体上建立一个二级菜单,该菜单含有“文件”和“帮助” (名称分别为 vbFile 和 vbHelp)两个主菜单项,其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项(名称分别为 vbOpen、 vbClose 和 vbExit),如图 1-1 所示。只建立菜单,不必定
2、义其事件过程。 注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt1.frm,工程文件名为 sjt1.vbp。 (2)在名为 Form1 的窗体上画一个框架,名称为 Frm1,标题为“框架”,高度为 2500,宽度为 4000,框架内建立一文本框,距左边框 600,距框架的上边框 1200,文本框中的初始内容设置为“文本框”。如图 1-2 所示。 注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt2.frm,工程文件名为 sjt2.vbp。 (分数:30.00)_二、B2 简单应用题 /B(总题数:1,分数:40.00)2.注意:下面出现的“考生文件夹”均为 c:/wexam/25
3、160001。 (1)在考生文件夹中有工程文件 sjt3.vbp及其窗体文件 sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号),但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下: 在窗体上有一个列表框,名称为 List1,一个文本框,名称为 Text1,和一个命令按钮,名称为 C1,标题为“复制”。要求程序运行后,在列表框中自动建立 4 个列表项,分别为“Item1”、“Item2”、“Item3”、“Item4”如果选择列表框中的一项,则单击“复制”按钮时,可以把该项复制到文本框中,如图 1-3 所示。 (2)在考生文件夹中有工
4、程文件 sjt4.vbp 及其窗体文件 sjt4.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 在窗体有 3 个复选框,名称分别为 Ch1、Ch2 和 Ch3,标题分别为“体育”、“音乐”、“美术”,还有一个命令按钮,名称为 C1,标题为“显示”。要求程序运行后,如果选中某个复选框,当单击“显示”命令按钮时,则显示相应的信息。例如,如果选中“体育”和“美术”复选框,单击“显示”命令按钮后,在窗体上显示“我的爱好是体育美术”,如图 1-4 所示。 (分数:40.00)_三、B3 综合应用题/B(总题数:1
5、,分数:30.00)3.在考生文件夹中有工程文件 sjt5.vbp 及其窗体文件 sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下: 在名称为 Form1 的窗体上有两个单选按钮,名称分别为 Opt1 和 Opt2,标题分别为“100-200 之间素数”和“200-400 之间素数”,一个文本框,名称为 Text1,和两个命令按钮,其名称分别为 Cmd1 和 Cmd2,标题分别为“计算”和“存盘”,如图 1-5 所示。程序运行后,如果选中一个单选按钮并单击“计算”按钮,则计算出该单选按
6、钮标题所指明的所有素数之和。并在文本框中显示出来。如果单击“存盘”按钮,则把计算结果存入“out.txt”文件中,该文件必须放在考生文件夹中。(在考生文件夹中有标准模块 mode.bas,其中的 putdata 过程可以把结果存入指定的文件,而 isprime 函数可以判断整数 x 是否为素数,如果是素数,则函数返回 True,否则返回 False,考生可以将该模块文件添加到自己的工程中。) 注意:必须把 200-400 之间的素数之和存入考生文件夹下的 out.txt 文件中,否则没有成绩。保存程序时必须存放在考生文件夹下,窗体文件名为 sjt5.frm,工程文件名为 sjt5.vbp。 (
7、分数:30.00)_二级 VISUAL+BASIC 机试 3 答案解析(总分:100.00,做题时间:90 分钟)一、B1 基本操作题/B(总题数:1,分数:30.00)1.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。 请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在窗体上建立一个二级菜单,该菜单含有“文件”和“帮助” (名称分别为 vbFile 和 vbHelp)两个主菜单项,其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项(名称分别为 vbOpen、 vbClose 和 vbExit),如图 1-1 所示。
8、只建立菜单,不必定义其事件过程。 注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt1.frm,工程文件名为 sjt1.vbp。 (2)在名为 Form1 的窗体上画一个框架,名称为 Frm1,标题为“框架”,高度为 2500,宽度为 4000,框架内建立一文本框,距左边框 600,距框架的上边框 1200,文本框中的初始内容设置为“文本框”。如图 1-2 所示。 注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt2.frm,工程文件名为 sjt2.vbp。 (分数:30.00)_正确答案:()解析:解析在 Visual Basic 中,菜单项通过菜单编辑器来建立。解题步骤: 第一
9、步:打开“菜单编辑器”窗口,建立菜单项。用到的菜单项及其属性见表 1-1。 二、B2 简单应用题 /B(总题数:1,分数:40.00)2.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。 (1)在考生文件夹中有工程文件 sjt3.vbp及其窗体文件 sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号),但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下: 在窗体上有一个列表框,名称为 List1,一个文本框,名称为 Text1,和一个命令按钮,名称为 C1,标题为“复制”。要求程序运行后,在列表框中自动建立 4
10、个列表项,分别为“Item1”、“Item2”、“Item3”、“Item4”如果选择列表框中的一项,则单击“复制”按钮时,可以把该项复制到文本框中,如图 1-3 所示。 (2)在考生文件夹中有工程文件 sjt4.vbp 及其窗体文件 sjt4.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 在窗体有 3 个复选框,名称分别为 Ch1、Ch2 和 Ch3,标题分别为“体育”、“音乐”、“美术”,还有一个命令按钮,名称为 C1,标题为“显示”。要求程序运行后,如果选中某个复选框,当单击“显示”命令按钮时,则
11、显示相应的信息。例如,如果选中“体育”和“美术”复选框,单击“显示”命令按钮后,在窗体上显示“我的爱好是体育美术”,如图 1-4 所示。 (分数:40.00)_正确答案:()解析:解析在窗体上建立好控件后,先设置控件属性,再编写事件过程。 向列表框中添加项目可以用AddItem 方法,也可以在属性窗口中进行。但题目中要求是程序运行后自动添加,所以利用代码实现。列表框的 Text 属性为最后一次选中的表项的文本。解题步骤: 第一步;建立界面并设置控件属性。程序中用到的控件及属性设置见表 1-2。 第二步:编写程序代码。 程序提供的代码: Option Explicit Private Sub C
12、1_Click() Dim i As Integer For i = ? To List1.ListCount-1 If List1.Selected(i) = True Then ? = List1.List(i) End If Next i End Sub Private Sub Form_Load() List 1.AddItem “Item1“ List 1.AddItem “Item2“ List 1.AddItem “Item3“ List 1.AddItem “Item4“ End Sub 参考代码: Option Explicit Private Sub C1_Click()
13、Dim i As Integer For i = 0 To List1.ListCount - 1 If List1.Selected(i) = True Then Text1.Text = List1.List(i) End If Next i End Sub Private Sub Form_Load() List1.AddItem “Item1“ List1.AddItem “Item2“ List1.AddItem “Item3“ List1.AddItem “Item4“ End Sub 第三步:调试并运行。 第四步:按题目要求存盘。 (2)解析在窗体上建立好控件后,先设置控件属性,
14、再编写事件过程。 单击命令按钮触发 Click 事件,程序中需要检测复选按钮的状态,可以通过 Value 属性来实现。如果复选按钮被选中,则 Value 值为 1,否则 Value 值为0。解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及属性见表 1-3。 三、B3 综合应用题/B(总题数:1,分数:30.00)3.在考生文件夹中有工程文件 sjt5.vbp 及其窗体文件 sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下: 在名称为 Form1 的窗体上有两个单选按钮,名
15、称分别为 Opt1 和 Opt2,标题分别为“100-200 之间素数”和“200-400 之间素数”,一个文本框,名称为 Text1,和两个命令按钮,其名称分别为 Cmd1 和 Cmd2,标题分别为“计算”和“存盘”,如图 1-5 所示。程序运行后,如果选中一个单选按钮并单击“计算”按钮,则计算出该单选按钮标题所指明的所有素数之和。并在文本框中显示出来。如果单击“存盘”按钮,则把计算结果存入“out.txt”文件中,该文件必须放在考生文件夹中。(在考生文件夹中有标准模块 mode.bas,其中的 putdata 过程可以把结果存入指定的文件,而 isprime 函数可以判断整数 x 是否为素
16、数,如果是素数,则函数返回 True,否则返回 False,考生可以将该模块文件添加到自己的工程中。) 注意:必须把 200-400 之间的素数之和存入考生文件夹下的 out.txt 文件中,否则没有成绩。保存程序时必须存放在考生文件夹下,窗体文件名为 sjt5.frm,工程文件名为 sjt5.vbp。 (分数:30.00)_正确答案:()解析:解析素数的判断准则就是看是否该数除了 1 和其本身外别无其他约数即可。 文本框用丁 Text 属性来显示计算结果:命令按钮的标题由 Caption 属性来设置,单击命令按钮触发 Click 事件;为了检测单选按钮是否选中,可以通过检测 Value 属性来实现,当 Value 为了 true 时,表示单选按钮被选中,否则未被选中。解题步骤: 第一步:建立界面并设置控件属性。题目提供了程序用到的控件及其属性,见表1-4。