1、国家二级 VB机试（上机操作）模拟试卷 401及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1、标题为“鼠标光标形状”的窗体上画一个名称为 Text1的文本框。请通过属性窗口设置适当属性，使得程序运行时，鼠标在文本框中时，鼠标光标为箭头(Arrow)形状；在窗体中其他位置处，鼠标光标为十字(Cross)形状。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。 (2)在名称为 Form1的窗体
2、上画两个标签，名称分别为 Labe11、Labe12，标题分别为“开始位置”、“选中的字符数”；画三个文本框，名称分别为 Text1、Text2、Text3，再画一个名称为 Command1，标题为“显示选中信息”的命令按钮。 程序运行时，在 Text1中输入若干字符，并用鼠标选中一些字符后，单击“显示选中信息”按钮，则把选中的第一个字符的顺序号显示在 Text2中，选中的字符个数显示在Text3中，如图 3152所示。要求：画出所有控件，编写命令按钮的 Click事件过程。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp
3、，窗体上有一个矩形和一个圆，还有垂直和水平滚动条各一个。程序运行时，移动某个滚动条的滚动块，可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例，滚动块在最左边时，圆靠在矩形的左边线上，如图 3153(a)所示；滚动块在最右边时，圆靠在矩形的右边线上，如图 3153(b)所示。垂直滚动条的情况与此类似。 文件中已经给出了全部控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp。窗体中已经给出了所有控件，如图
4、3154所示。（分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是： 如果单击“读数据”命令按钮，则把考生文件夹下 in5dat 文件中两组己按升序方式排列的数(每组 30个数)分别读入数组 A和 B，并分别将它们显示在 Txt1、Text2 中； 如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组C中的数据依升序方式显示在 Text3中。 窗体中给出了所有控件(如图 3一 155所示)以及“读数据”命令按钮的
5、 Click事件过程，请完善“合并”命令按钮的 Click事件过程，使其实现上述功能。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 401答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1、标题为“鼠标光标形状”的窗体上画一个名称为 Text1的文本框。请通过属性窗口设置适当属性，使得程序运行时，鼠标在文本框中时，鼠标光标为箭头(Arrow)形状；在窗体中其他位置处，鼠标光标为十字(Cross)形状。 注意：存盘时必须存放在考
6、生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。 (2)在名称为 Form1的窗体上画两个标签，名称分别为 Labe11、Labe12，标题分别为“开始位置”、“选中的字符数”；画三个文本框，名称分别为 Text1、Text2、Text3，再画一个名称为 Command1，标题为“显示选中信息”的命令按钮。 程序运行时，在 Text1中输入若干字符，并用鼠标选中一些字符后，单击“显示选中信息”按钮，则把选中的第一个字符的顺序号显示在 Text2中，选中的字符个数显示在Text3中，如图 3152所示。要求：画出所有控件，编写命令按钮的 Click事件过程。 （分数：2.
7、00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：新建“标准 EXE”工程，按要求画出控件并设置相应属性。 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：在代码编辑窗口，编写命令按钮的单击事件过程。参考代码：Private Sub Command1_Click() Text2Text1SelStart1 Text3Text1SelLength End Sub 步骤3：按要求将文件保存至考生文件夹中。)解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件
8、sjt3vbp，窗体上有一个矩形和一个圆，还有垂直和水平滚动条各一个。程序运行时，移动某个滚动条的滚动块，可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例，滚动块在最左边时，圆靠在矩形的左边线上，如图 3153(a)所示；滚动块在最右边时，圆靠在矩形的右边线上，如图 3153(b)所示。垂直滚动条的情况与此类似。 文件中已经给出了全部控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp。窗体中已经给出了所
9、有控件，如图 3154所示。（分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：打开考生文件下的本题工程文件 sjt3vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： HScorl11Max Shape2Width Shape2LeftShape1Width VScrol11Max Shape2Height Shape2TopShape1Height Shape1LeftHScrol11Value ShaDe1TOpVScrol11 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件
10、sjt4vbp，在代码编辑窗口，去掉程序中的注释符“”将问号“?”改为正确的内容。参考代码： Timer1EnabledTrue Timer1EnabledFalse ddImage1Top tt1 步骤 2：按F5键运行程序，先单击“发射”按钮，计算完毕后单击“存盘”按钮，最后单击窗体右上角的关闭按钮结束程序。步骤 3：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是： 如果单击“读数据”命令按钮，则把考生文件夹下 in5dat 文件
11、中两组己按升序方式排列的数(每组 30个数)分别读入数组 A和 B，并分别将它们显示在 Txt1、Text2 中； 如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组C中的数据依升序方式显示在 Text3中。 窗体中给出了所有控件(如图 3一 155所示)以及“读数据”命令按钮的 Click事件过程，请完善“合并”命令按钮的 Click事件过程，使其实现上述功能。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹下的工程文件 sjt5vbp。 步骤 2：编写“合并”按钮的单击事件过程。参考代码： Private
12、Sub Command2_CliCk() 考生编写程序开始 ia1：ib1：ic1 Do While ia30 And ib30 If a(ia) b(ib)Then c(ic)a(ia)：iaia1 Else c(iC)b(ib)：ibib1 End If icic1 Loop Do While ia 30 c(ic)a(ia)：iaia1：icic1 Loop Do While ib30 c(ic)b(ib) ：ibib1：icic1 Loop 考生编写程序结束 以下程序将合并后的数组 C显示在 Text3中 For k1 To 60 Text3Text3Str(c(k)Space(2) Next k End S11b 步骤 3：运行程序，单击“读数据”按钮，然后单击“合并”按钮获得结果，然后通过窗体右上角的“关闭”按钮结束程序。 步骤 4：按要求将文件保存至考生文件夹中。)解析：
