1、VB 机试模拟试卷 34 及答案与解析 一、基本操作题（ 30分） 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 1在Form1的窗体上画一个名称为 P1的图片框，然后建立一个主菜单，标题为 “操作 ”，名称为 Op，该菜单有两个子菜单，其标题分别为 “显示 ”和 “清除 ”，名称分别为 Dis和 Clea。编写适当的事件过程，程序运行后，如果单击 “操作 ”菜单中的 “显示 ”命令，则在图片框中显示 “计算机考试 ”；如果单击 “清除 ”命令，则清除图片框中的信息。程序的运行情况如图 11和图 12所示 。注意：存盘时必须存放在考生文件夹下，工程文
2、件名为 sjt1.vbp，窗体文件名为sjt1.frm。程序中不得使用任何变量。 2在 Form1的窗体上画一个列表框，名称为 L1，通过属性窗口向列表框中添加 4个项目，分别为 “早上好 ”、 “上午好 ”、 “中午好 ”和 “下午好 ”。编写适当的事件过程，过程中只能使用一条命令。程序运行后，如果双击列表框中的某一项，则把该项再添加到列表框中。程序的运行情况如图 13所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2.vbp，窗体文件名为 sjt2.frm。二、简 单应用题（ 40分） 2 创建名称为 Form1的窗体，标题为 “欢迎窗口 ”，并在窗体上画一个命令按钮，名称为
3、 “我要进入 ”。请编写一个事件过程，实现运行程序时，单击命令按钮后按钮消失，窗体上显示 “欢迎您的光临尸。运行后窗体如图 2所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc2.vbp，窗体文件名为 ylc2.frm。 三、综合应用题（ 30分） 3 在考生文件夹下有一个工程文件 sjt5.vbp，其窗体上有两个标签 L1和 L2，标题分别为 “口令 ”和 “允许次数 ”；一个命令按钮 C1，标题为 “确定 ”；两个文本框名称分别为 Text1和 Text2，其中 Text1用来输入口令 (输入时，显示 “*”)，无初始内容Text2的初始内容为 3，如
4、图 31所示。 程序给出了 C1的事件过程，但不完整，要求去掉程序中的注释符，把程序中的 ?改为正确内容，使得在运行时，在 Text1中输入口令后，单击 “确定 ”按钮，如果输入的是 “123456”则在 Text1中显示 “口令正确 ”；如果输入其他内容，单击 “确定 ”后，弹出错误提示对话框，并且 Text2中的数字减 1。最多可输入 3次口令，若 3次都输入错误，则禁止再次输 入。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。VB 机试模拟试卷 34 答案与解析 一、基本操作题（ 30分） 1 【正确答案】 分析：在窗体上建立好控件后，先设置控件属性，再编写事件过程
5、。 主菜单由单击右键选择 “菜单编辑器 ”来创建，通过 Print方法在窗体或图片框中打印信息，通过 Cls方法清除图片框中的信息。 Cls方法清除运行时 Form或PictureBox所生成的图形和文本。 语法： object.Cls object代表一个对象表达式。如果省略 object，则默认为 当前的 Form窗体。 解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件和属性设置见表 1。表 1控 件 属 性 设置值菜单 名称标题 Op操作菜单 名称标题 Dis显示菜单 名称标题 Clea清除图片框 Name P1 第二步：编写程序代码。 参考代码： Private Sub C
6、lea_Click() P1.Cls End Sub Private Sub Dis_Click() P1.Print “计算机考试 “ End Sub 第三步：调试并运行程序。 第四步 ：按题目要求存盘。 2 在窗体上建立好控件后，先设置控件属性，再编写事件过程。 列表框的内容由属性 List来设置，在程序中添加项要通过 AddItem方法来实现，鼠标双击触发控件的 DblClick事件。 AddItem方法用于将项目添加到 ListBox或 ComboBox 控件，其语法格式为： object.AddItem item,index object必需的。一个对象表达式。 item必需的。字符
7、串表达式，它用来指定添加到该对象的项目。 index可选的。是整数，它用来指定新项目或行在该对 象中的位置。对于 ListBox或 ComboBox控件的首项 index为 0。 解题步骤； 第一步：建立界面并设置控件属性。程序中只用到的控件和属性设置见表 2。 表 2控 件 属 性 设置值列表框 Name L1 第二步：编写程序代码。 参考代码 Private Sub L1_Dblclick() L1.AddItem L1.Text End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。 二、简单应用题（ 40分） 2 【正确答案】 Visual Basic集成环境中，执行 “文
8、件 ”“ 新建工程 ”命令，选择 “标准 Exe”。在 Form1的属性窗口中，将 Caption属性设置为 “欢迎窗口 ”。 (2)在工具项中选择标签控件，在窗体合适位置创建标签，在属性窗口中将其Caption属性设置为 “欢迎您的光临 ”，将其 Visible属性设置为不可见。 (3)在工具箱中选择命令按钮控件，在窗体合适位置创建命令按钮，在属性窗口中将其 Caption属性设置为 “我要进入 ”。双击命令按钮控件打开代码窗口，在其中输入如下代码： Private Sub Command1_Click() Command1.Visible=False Label1.Visible=True
9、 End Sub (4)按 F5键运行程序，单击命令按钮如图 2所示。 (5)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为 ylc2.vbp，窗体文件命名为 ylc2.frm。 【试题解析】 (1)文本框的 PasswordChar属性用于设置密码域文本框。将该属性设置为某个字符，运行程序时，输入文本框的内容全部显示为设置好的字符。 该属性是上机考试中比较常见的考点。 (2)Click事件是上机考试中最常见的考点之一。本题考查了命令按钮的 Click事件。该事件过程要求改变命令控件和标签控件的可见属性，而这一属性通过控件的 Visible属性来设置。在代码中，对控件的某属性设置的语句
10、格式为：控件名属性名；属性值。 三、综合应用题（ 30分） 3 【正确答案】 在窗体上建立好控件后，先设置控件属性，再编写事件过程。 在文本框里显示的内容通过 Text属性设置，其形式为： 文本框名 .Text显示的内容 要 使文本框内容显示为 “*”，需将 PasswordChar属性设置为 “*”。 程序中用到的 MsgBox 语句用法为： MsgBox提示 ,按钮 ,标题 在程序运行时控件是否可操作由 Enabled属性设置，当该属性为 True时控件可操作，为 False时不可操作。若 3次都输入错误，禁止再次输入，将文本框的Enabled属性置为 False即可。 解题步骤： 第一步
11、：建立界面并设置控件属性。程序中用到的控件及其属性值见表 4。 表 4控 件 属 性 设 置 值 文本框 Name Text Text1 空 文本框 Name Text Text2 3 命令按钮 Name Caption C1 确定 标签 Name Caption L1 口令 标签 Name Caption L2 输入次数 第二步：编写程序代码。 程序提供的代码： Private Sub C1_Click() If?=“123456“ Then Text1.Text “口令正确 “ Text1.? “ Else Text2.Text Text2.Text1 If Text2.Text ?The
12、n MsgBox “第 “ & (3Text2.Text) & “次口令错误，请重新输入 “ Else MsgBox “3次输入错误，请退出 “ Text1.Enabled=? End If End If End Sub 参考代码： Private Sub C1_Click() If Text1.Text=“123456“ Then Text1.Text=“口令正确 “ Text1.PasswordChar=“ Else Text2.Text=Text2.Text1 If Text2.Text 0 Then MsgBox “第 “ & (3Text2.Text) & “次口令错误，请重新输入 “ Else MsgBox “3次输入错误，请退出 “ Text1.Enabled= False End If End If End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。
