1、国家二级 VB 机试（上机操作）-试卷 47 及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml、标题为“图片”的窗体上画一个名称为 Imagel 的图像框，其高为 2500、宽为 2000。请通过属性窗口设置适当属性，装入考生目录下的图片文件 picljpg，并使图片适应图像框的大小(如图 3135 所示)。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sitlfrm。 (2)在名称为Forml 的窗体上
2、画一个名称为 Labell、标题为“口令”的标签；画一个名称为 Textl 的文本框；再画三个命令按钮，名称分别为 Command1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行时，在 Textl 巾输入若：干二字符，单击“隐藏口令”按钮，则只显示同样数量的“*”，如图 3 一 136(b)所示；单击“显示口令”按钮，则显示输入的字符，如图 3136(a)所示，单击“重新输入”按钮，则清除 Textl 中的内容，并把光标定位到 Textl 中。要求：请画出所有控件，编写命令按钮的 Click 事件过程，程序中不得使用变量，在“显示口令”按钮、
3、隐藏口令”按钮的事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为sjt2frm。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Forml 的窗体上画一个名称为 Text1 的文本框，再建立一个名称为 Format 的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为 M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图 3145 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为
4、sit3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sit4vbp，含有 Forml和Form2 两个窗体，Forml 为启动窗体，窗体上的控件如图 3 一 146(a)所示。程序运行后，在 Forml 窗体的文本框中输入有关信息(“密码”框中显示“*”字符)，然后单击“提交”按钮则弹出“确认”对话框(即 Form2 窗体)，并在 Form2 中显示输入的信息，如图 3146(b)所示。单击“确认”按钮则程序结束，单击“重输”按钮，则 Form2 消失，回到 Forml 窗体。在给出的窗体文件中已经给出了程序，但不完整。要求：把 Forml 的标题改为“注册”，
5、把 Form2 的标题改为“确认”；设置适当的属性，使 Form2 标题栏上的所有按钮消失(如图 3 一 146(b)所示)；去掉程序巾的注释符，把程序中的?改为正确的内容。注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp。其窗体中有一个名称为 Textl 的文本框数组，下标从 0 开始。程序运行时，单击“产生随机数”按钮，就会产生 10 个 3 位数的随机数，并放入 Textl 数组中，如图 3-115(a)所示；单击“重排
6、数据”按钮，将把 Text1 中的奇数移到前面，偶数移到后面，如图3115(b)所示。文件中已经给出了所有控件和部分程序。 （分数：2.00）_国家二级 VB 机试（上机操作）-试卷 47 答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml、标题为“图片”的窗体上画一个名称为 Imagel 的图像框，其高为 2500、宽为 2000。请通过属性窗口设置适当属性，装入考生目录下的图片文件 picljpg，并使图片适应图像框的大小(如图 3135
7、 所示)。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sitlfrm。 (2)在名称为Forml 的窗体上画一个名称为 Labell、标题为“口令”的标签；画一个名称为 Textl 的文本框；再画三个命令按钮，名称分别为 Command1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行时，在 Textl 巾输入若：干二字符，单击“隐藏口令”按钮，则只显示同样数量的“*”，如图 3 一 136(b)所示；单击“显示口令”按钮，则显示输入的字符，如图 3136(a)所示，单击“重新输入”按钮，则清除 Textl
8、中的内容，并把光标定位到 Textl 中。要求：请画出所有控件，编写命令按钮的 Click 事件过程，程序中不得使用变量，在“显示口令”按钮、“隐藏口令”按钮的事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为sjt2frm。 （分数：2.00）_正确答案：(正确答案：第 1 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，画出控件并设置相应属性。 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：在代码编辑窗口，分别编写三个按钮的单击
9、事件过程。 参考代码： Private Sub Commandl Click() TextlPaSSWOrdChar=“” End Sub Private Sub Command2 Click() TextlPaSswordChar=”*” End Sub Private Sub Command3 C1ick() Textl=“” TextlSetFocuS End Sub 步骤 3：按要求将文件保存至考生文件夹中。)解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在名称为 Forml 的窗体上画一个名称为 Text1 的文本框，再建立一个名称为 Format 的弹出式菜单，含三个
10、菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为 M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图 3145 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sit3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sit4vbp，含有 Forml和Form2 两个窗体，Forml 为启动窗体，窗体上的控件如图 3 一 146(a)所示。程序运行后，在 Forml 窗体的文本框中输入有关信息(“密码”框中显示“*”字符)，然后单击“提交”按钮则弹出“确认
11、对话框(即 Form2 窗体)，并在 Form2 中显示输入的信息，如图 3146(b)所示。单击“确认”按钮则程序结束，单击“重输”按钮，则 Form2 消失，回到 Forml 窗体。在给出的窗体文件中已经给出了程序，但不完整。要求：把 Forml 的标题改为“注册”，把 Form2 的标题改为“确认”；设置适当的属性，使 Form2 标题栏上的所有按钮消失(如图 3 一 146(b)所示)；去掉程序巾的注释符，把程序中的?改为正确的内容。注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：第
12、1 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，选择【工具】【菜单编辑器】命令，打开菜单设计器，按要求设置建立菜单项。 步骤 2：在窗体中画一个文本框，取名为 Text1。 步骤 3：打开代码编辑窗口，分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。 参考代码： Private Sub Form MouseDown(Button As Integer r Shift As Integer， X As Single t Y As Single) If Button=2 Then PopupMenu format End If End Sub Private Sub ml
13、Click() Text1FontBold=True End Sub Private Sub m3 Click() TextlFontUnderline=True End Sub Private Sub m2 C1ick() TextlFontItalic=True End Sub 步骤 4：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：打开考生文件夹下的工程文件 sjt4vbp。 步骤 2：按要求设置两个窗体的相关属性。 步骤 3：打开 Forml 的代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： Form2Show Form2Pri
14、nt FormlFramelCaption；“：”； If FormlOpl(k)Value Then Text2PasswordChar=”*” 步骤 4：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp。其窗体中有一个名称为 Textl 的文本框数组，下标从 0 开始。程序运行时，单击“产生随机数”按钮，就会产生 10 个 3 位数的随机数，并放入 Textl 数组中，如图 3-115(a)所示；单击“重排数据”按钮，将把 Text1 中的奇数移到前面，偶数移到后面，如图3115(b)所示。文件中已经给出了所有控件和部分程序。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt5vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： j=9 temp=Textl(j) While(i解析：
