1、国家二级 VB 机试（上机操作）模拟试卷 336 及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.(1)在名称为 Form1，标题为“图书”的窗体上画 1 个名称为 Cmbl 的下拉式组合框。下拉列表中有“少儿读物”“传记文学”和“武侠小说”3 个表项内容。运行后的窗体如图 314 所示。 (1)在名称为Form1，标题为“图书”的窗体上画 1 个名称为 Cmbl 的下拉式组合框。下拉列表中有“少儿读物”“传记文学”和“武侠小说”3 个表项内容。运行后的窗体如图 314 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，
2、窗体文件名为 sjtlfrm。 (2)在名称为 Form1 的窗体上，画 1 个能根据标题内容自动调整大小的标签，其名称为 Label1，标题为 Visual Basic，字号为 14 号字。再画 2 个名称分别为 Command1、Command2，标题分别为“放大”“缩小”的命令按钮。效果如图 315 所示。 要求：编写适当的事件过程，使得每单击“放大”按钮一次，Label1 中所显示的标题内容自动增大 3 个字号；每单击“缩小”按钮时，Label1 中所显示的标题内容自动缩小 3 个字号。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Form1 的
3、窗体上画一个名称为 Text1 的文本框，再建立一个名称为 Format 的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为 M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图 3149 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sjt4vbp，含有 Form1和 Form2 两个窗体，Form1 为启动窗体，窗体上的控件如图 3150(a)所示。程序运行后，在 Form1
4、 窗体的文本框中输入有关信息(“密码”框中显示“*”字符)，然后单击“提交”按钮则弹出“确认”对话框(即 Form2 窗体)，并在 Form2 中显示输入的信息，如图 3150(b)所示。单击“确认”按钮则程序结束，单击“重输”按钮，则 Form2 消失，回到 Form1 窗体。在给出的窗体文件中已经给出了程序，但不完整。要求： 把 Form1 的标题改为“注册”，把 Form2 的标题改为“确认”；设置适当的属性，使 Form2标题栏上的所有按钮消失(如图 3150(b)所示)；去掉程序中的注释符，把程序中的“?”改为正确的内容。 注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗
5、口中进行。最后把修改后的文件按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹中有一个工程文件 vbsj5vbp(相应的窗体文件为 vbsii5frm)。窗体 Form1 上有两个名称为 Labl 和 Lab2 的标签，它们的标题分别为“密码“和“允许次数”；一个名称为 Cmd1 的命令按钮，其标题为“确定”；两个名称分别为 Txt1 和 Txt2 的文本框。其中 Txt1 用来输入密码(输入时显示“*”)，无初始内容，Txt2 的初始内容为 3。已给出了 Cmdl 的事件过程，但不完整，要求去掉程序中的注释符“*”，把程序中的问号“?”改为正确
6、内容，使得在运行时，在 Txt1 中输入密码后，单击“确定”按钮，如果输入的是“123456”，则在 Txt1 中显示“密码正确”如图 3-66 所示；如果输入其他内容，单击“确定”后，弹出如图 367 所示的错误提示对话框，并且 Txt2 中的数字减 1。最多可输入 3 次密码，若 3次输入错误，则禁止再次输入。 （分数：2.00）_国家二级 VB 机试（上机操作）模拟试卷 336 答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.(1)在名称为 Form1，标题为“图书”的窗体上画 1 个名称为 Cmbl 的下拉式组合框。下拉列表中有“少儿读物
7、”“传记文学”和“武侠小说”3 个表项内容。运行后的窗体如图 314 所示。 (1)在名称为Form1，标题为“图书”的窗体上画 1 个名称为 Cmbl 的下拉式组合框。下拉列表中有“少儿读物”“传记文学”和“武侠小说”3 个表项内容。运行后的窗体如图 314 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为 Form1 的窗体上，画 1 个能根据标题内容自动调整大小的标签，其名称为 Label1，标题为 Visual Basic，字号为 14 号字。再画 2 个名称分别为 Command1、Command2，标题分别为“
8、放大”“缩小”的命令按钮。效果如图 315 所示。 要求：编写适当的事件过程，使得每单击“放大”按钮一次，Label1 中所显示的标题内容自动增大 3 个字号；每单击“缩小”按钮时，Label1 中所显示的标题内容自动缩小 3 个字号。 （分数：2.00）_正确答案：(正确答案：(1)步骤 1：新建一个“标准 EXE”工程，在窗体 Form1 中加入一个组合框。按表4-8 设置其相关属性。 步骤 2：按要求将文件保存至考生文件夹中。 (2)步骤 1：新建一个“标准EXE”工程，在窗体 Form1 中加入一个标签和两个命令按钮。按表 4-9 设置其相关属性。其中 FontSize 的设置方法为，
9、在标签的属性窗体里面找打 Font 属性，点击 Font 属性右边的“”按钮弹出字体设置对话框，在里面设置字体大小为 14。 )解析：解析：(1)根据题目要求，在窗体上放置一个组合框，并设置窗体和组合框的属性。 (2)根据题目要求在点击“放大”和“缩小”命令按钮时修改 Label1 控件显示的字体大小，可在命令按钮的 Click 事件处理过程中，设置 Label1 的 FontSize 属性。二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Form1 的窗体上画一个名称为 Text1 的文本框，再建立一个名称为 Format 的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜
10、体”、“下划线”，名称分别为 M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图 3149 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sjt4vbp，含有 Form1和 Form2 两个窗体，Form1 为启动窗体，窗体上的控件如图 3150(a)所示。程序运行后，在 Form1 窗体的文本框中输入有关信息(“密码”框中显示“*”字符)，然后单击“提交”按钮则弹出“确认”对话框(即 Form2 窗体)，
11、并在 Form2 中显示输入的信息，如图 3150(b)所示。单击“确认”按钮则程序结束，单击“重输”按钮，则 Form2 消失，回到 Form1 窗体。在给出的窗体文件中已经给出了程序，但不完整。要求： 把 Form1 的标题改为“注册”，把 Form2 的标题改为“确认”；设置适当的属性，使 Form2标题栏上的所有按钮消失(如图 3150(b)所示)；去掉程序中的注释符，把程序中的“?”改为正确的内容。 注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：(1)步骤 1：新建一个“标准 EXE
12、”工程，选择【工具】【菜单编辑器】命令，打开菜单设计器，按要求设置建立菜单项。 步骤 2：在窗体中画一个文本框，取名为 Text1。 步骤 3：打开代码编辑窗口，分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。参考代码： Private Sub Form MouseDown(Button AS Integer，Shift AS Integer，X As Single， Y As Single) If Button=2 Then PopupMenu format End If End Sub Private Sub m1_Click() Text1FontBold=True End Su
13、b Private Sub m3_Click() Text1FontUnderline=True End Sub Private Sub m2_Click() Text1FontItaliC=True End Sub 步骤 4：按要求将文件保存至考生文件夹中。 (2)步骤 1：打开考生文件夹下的工程文件 sjt4vbp。 步骤 2：按要求设置两个窗体的相关属性。 步骤 3：打开 Form1 的代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： Form2Show Form2Print Form1FramelCaption；”： “； If Form1Op1(k)Val
14、ue Then Text2PasswordChar=“*“ 步骤 4：按要求将文件保存至考生文件夹中。)解析：解析：(1)要创建本题的弹出式菜单需先用菜单编辑器来建立菜单，并将其主菜单项的可见(即Visible)属性值设置为 False，然后在窗体的 MouseDown(或 MouseUp)事件过程中，判断该事件的 BuRon参数值是否为 2，若是则执行窗体的 PopupMenu 方法来显示菜单。 在相应菜单项的 Click 事件过程中，通过设置文本框的 FontBold 属性值、FontItalic 属性值和 FontUnderline 属性值为 True，可分别将文本框中文本样式显示为加粗
15、、斜体和下划线。 (2)在 Form1 的单击事件中，首先显示出 Form2，然后按照要求在 Form2 上先后显示出 Form1 中的信息，其中单选按钮组需要使用 If 语句判断是哪个按钮被选中。文本框的 PasswordChar 属性可以设置文本框中显示的密码形式。三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹中有一个工程文件 vbsj5vbp(相应的窗体文件为 vbsii5frm)。窗体 Form1 上有两个名称为 Labl 和 Lab2 的标签，它们的标题分别为“密码“和“允许次数”；一个名称为 Cmd1 的命令按钮，其标题为“确定”；两个名称分别为 Txt1 和 Txt
16、2 的文本框。其中 Txt1 用来输入密码(输入时显示“*”)，无初始内容，Txt2 的初始内容为 3。已给出了 Cmdl 的事件过程，但不完整，要求去掉程序中的注释符“*”，把程序中的问号“?”改为正确内容，使得在运行时，在 Txt1 中输入密码后，单击“确定”按钮，如果输入的是“123456”，则在 Txt1 中显示“密码正确”如图 3-66 所示；如果输入其他内容，单击“确定”后，弹出如图 367 所示的错误提示对话框，并且 Txt2 中的数字减 1。最多可输入 3 次密码，若 3次输入错误，则禁止再次输入。 （分数：2.00）_正确答案：(正确答案：步骤 1：打开考生文件夹中的本题工程
17、文件 vbsi5vbp，将文本框 Txt1 的PasswordChar 属性值设置为“*”。 步骤 2：在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： If Txt1Text=“123456“Then Txt1PasswordChar=“ If Txt2Text0 Then Txt1Enabled=False 步骤 3：按要求将文件保存至考生文件夹中。)解析：解析：根据题目源程序，判断文本框 Txt1 输入的密码是否为“123456”的条件表达式为：Txt1Text=“123456“；要去掉对文本框中输入内容的屏蔽，需将其 PasswordChar 属性值清空，即执行语句：Txt1PasswordChar=“；每输入一次错误密码，文本框 Txt2 中的数字减 1，当文本框 Txt2 中数值还大于 0 时，提示重新输入，否则提示错误，并禁用文本框 Txt1。
