1、VB 机试-试卷 17 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画两个文本框，其名称分别为 Tcxtl 和 Text2，它们的高、宽分别为 300、2400 和 1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性满足以下要求：Text2 可以显示多行文本，且有垂直和水平两个滚动条；运行时在 Textl 中输入的字符都显示为“*”。运行后的窗体如图 1-166 所示
2、。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为 Forml 的窗体上画一个图像框，名称为 tmagcl，其高、宽分别为 1900、1700，通过属性窗口把考生文件夹下的图像文件 piclbmp 装入图像框；再画两个命令按钮，名称分别为 Cl、C2，标题分别为“放大”、“缩小”，如图 1-167 所示。要求：请编写适当的事件过程，程序运行后，如果单击“放大”按钮，则把图像框的高度、宽度均增加 100；单击“缩小”按钮，则把图像框的高度、宽度均减少 100。要求程序中不得使用任何变量。通过属性窗口设置图像框的适当属性，使得在放大、
3、缩小图像框时，其中的图像也自动放大、缩小。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2vbp，窗体文件名为sjt2frm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.(1)在名称为 Forml 的窗体上画一个名称为 Labell、标题为“添加项目：”的标签；画一个名称为Textl 的文本框，没有初始内容；画一个名称为 Combol 的下拉式组合框，并通过属性窗口输入若干项目(不少于三个，内容任意)；再画两个命令按钮，名称分别为 Commandl、Command2，标题分别为“添加”、“统计”。在运行时，向 Textl
4、 中输入字符，单击“添加”按钮后，则 Textl 中的内容作为一个列表项被添加到组合框的列表中；单击“统计”按钮，则在窗体上显示组合框中列表项的个数，如图 1-144 所示。请编写两个命令按钮的 Click 事件过程。注意：程序中不得使用变量，也不能使用循环。存盘时必须存放在考生文件夹下，工程文件名为 sjl3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sjt4,vbp，其窗体如图 1-145 所示。该程序用来对在上面的文本框中输入的英文字母串(称为“明文”)加密，加密结果(称为“密文”)显示在下面的文本框中。加密的方法是：选中一个单选按钮，单击“加密”按钮后，
5、根据选中的单选按钮后面的数字 n，把明文中的每个字母改为它后面的第 n 个字母(“z”后面的字母认为是“a”，“Z”后面的字母认为是“A”)，如图 1-145 所示。窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生目录下已有一个工程文件 sjt5vbp。运行程序后，分别从两个文件中读出数据，放入两个一维数组 a、b 中。请编写程序，当单击“合并数组”按钮时，
6、将 a、b 数组中相同下标的数组元素的值求和，并将结果存入数组 c。单击“找最大值”按钮时，调用 find 过程分别找出 a、c 数组中元素的最大值，并将所找到的结果分别显示在 Textl、Text2 中。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，并编写相应程序，实现程序的功能。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，各命令按钮的事件过程必须至少各执行一次。（分数：2.00）_VB 机试-试卷 17 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：
7、4.00)1.基本操作题（）（分数：2.00）_解析：2.请根据以下各小题的要求设计 VisualBasic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画两个文本框，其名称分别为 Tcxtl 和 Text2，它们的高、宽分别为 300、2400 和 1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性满足以下要求：Text2 可以显示多行文本，且有垂直和水平两个滚动条；运行时在 Textl 中输入的字符都显示为“*”。运行后的窗体如图 1-166 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2
8、)在名称为 Forml 的窗体上画一个图像框，名称为 tmagcl，其高、宽分别为 1900、1700，通过属性窗口把考生文件夹下的图像文件 piclbmp 装入图像框；再画两个命令按钮，名称分别为 Cl、C2，标题分别为“放大”、“缩小”，如图 1-167 所示。要求：请编写适当的事件过程，程序运行后，如果单击“放大”按钮，则把图像框的高度、宽度均增加 100；单击“缩小”按钮，则把图像框的高度、宽度均减少 100。要求程序中不得使用任何变量。通过属性窗口设置图像框的适当属性，使得在放大、缩小图像框时，其中的图像也自动放大、缩小。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2vb
9、p，窗体文件名为sjt2frm。 （分数：2.00）_正确答案：(正确答案： 第 1 小题 【操作步骤】 步骤 l：新建一个“标准 EXE”工程，在窗体 Forml 中画两个文本框，并分别设置它们的相关属性，其属性及值如表 2-94 所示。 步骤 2：按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，如表 2-95 在窗体中画出控件并设置其相关属性。 )解析：解析：第 1 小题 文本框控件的 MultiLine 属性设置文本框是否能以多行显示文本，值为 True 表示允许，值为 False 表示不允许；ScrollBars 属性设置文本框是否
10、有水平或垂直滚动条，它的值为；0 表示没有滚动条(默认值)，1 表示只有水平滚动条，2 表示只有垂直滚动条，3 表示有水平和垂直滚动条，设置 O 以外的值时 MultiLine 属性值必须为 True。 本题只需按要求画出控件并设置其相应属性即可。 第2 小题 为图像框控件指定图片有两种方法：一是在设计阶段通过 Picture 属性设置；二是在程序运行时通过 LoadPictm()图片加载函数加载，其语法为：图片框Picture=Loadicture(“图像文件路径“)，AppPath 可返回当前工程文件所在的文件夹路径，是使用相对路径的一种用法。用不带参数的LoadPicture 函数为对象
11、的 Picture 属性赋值将清除窗体、图片框及图像控件中的图形。Stretch(自动伸缩)属性用来设定图像框是否需要自动调整大小，以适应载入图像框中的图片的大小，值为 True 时表示自动调整。 程序运行时要改变图像框的大小，可通过修改其 Width 和。Height 属性值来实现。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在名称为 Forml 的窗体上画一个名称为 Labell、标题为“添加项目：”的标签；画一个名称为Textl 的文本框，没有初始内容；画一个名称为 Combol 的下拉式组合框，并通过属性窗口输入若干项目(不少于三个
12、，内容任意)；再画两个命令按钮，名称分别为 Commandl、Command2，标题分别为“添加”、“统计”。在运行时，向 Textl 中输入字符，单击“添加”按钮后，则 Textl 中的内容作为一个列表项被添加到组合框的列表中；单击“统计”按钮，则在窗体上显示组合框中列表项的个数，如图 1-144 所示。请编写两个命令按钮的 Click 事件过程。注意：程序中不得使用变量，也不能使用循环。存盘时必须存放在考生文件夹下，工程文件名为 sjl3vbp，窗体文件名为 sjt3frm。 (2)在考生文件夹下有一个工程文件 sjt4,vbp，其窗体如图 1-145 所示。该程序用来对在上面的文本框中输
13、入的英文字母串(称为“明文”)加密，加密结果(称为“密文”)显示在下面的文本框中。加密的方法是：选中一个单选按钮，单击“加密”按钮后，根据选中的单选按钮后面的数字 n，把明文中的每个字母改为它后面的第 n 个字母(“z”后面的字母认为是“a”，“Z”后面的字母认为是“A”)，如图 1-145 所示。窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案： 第 l 小题 【操作步骤】 步骤 l：新建一个“标准 EXE”工程，如表 2-8
14、1 在窗体中画出控件并设置其相关属性。 )解析：解析： 第 l 小题 组合框(ComboBox)将文本框与列表框的特性组合在一起，既可在组合框的文本框部分输入信息，也可在列表框部分选择项目。可通过修改组合框的 Style 属性值来改变其显示类型，值为 0-Dropdown Combo 时，表示下拉式组合框，包括一个下拉式列表和一个文本框，可以从列表选择或在文本框中输入；值为 1-Simple Combo 时，表示简单组合框，包括一个文本框和一个不带下拉的列表，可以从列表中选择或在文本框中输入，增加其高度可显示列表的更多部分；值为 2-Dropdown List 时，表示下拉式列表，这种样式仅允
15、许从下拉式列表中选择。 组合框的列表项既可以在设计阶段通过其 List 属性设置加入(注意：每输入完一项后按键换行再输入下一项)，也可在程序运行时通过 Addltem 方法加入，其语法为：组合框名Addltem 项目字符串，索引值】。其中，“索引值”可以指定插入项在列表框中的位置，表中的项目从 0 开始计数。如果省略“索引值”，则文本被放在列表框的尾部。 ListCount属性用来返回组合框中当前的列表项总数。 本题需按要求设计程序界面，并编写“添加”和“统计”命令按钮的 Click 事件过程。 第 2 小题 Strings(个数，字符)函数用于返回含指定个数字符的字符串。 程序设计思路：在“
16、加密”按钮的单击事件过程中，首先利用 For 循环语句逐一判断单选按钮组中各个元素是否选中，若选中则用变量 n 记录下该单选按钮所代表的数值；接着再次利用 For 循环语句和 Mid 函数逐一为文本框中的每一个字符“加密”，若“加密”后得到的字符在 ASCII 表中值大于“z”，则重新取比其小 26 的字符；最后将“加密”后的字符串显示在文本框 Text2 中。三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生目录下已有一个工程文件 sjt5vbp。运行程序后，分别从两个文件中读出数据，放入两个一维数组 a、b 中。请编写程序，当单击“合并数组”
17、按钮时，将 a、b 数组中相同下标的数组元素的值求和，并将结果存入数组 c。单击“找最大值”按钮时，调用 find 过程分别找出 a、c 数组中元素的最大值，并将所找到的结果分别显示在 Textl、Text2 中。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，并编写相应程序，实现程序的功能。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，各命令按钮的事件过程必须至少各执行一次。（分数：2.00）_正确答案：(正确答案： 【操作步骤】 步骤 1：打开考生文件夹下的本题工程文件 sjt5vbp。打开
18、代码编辑窗口。在指定位置编写代码。 参考代码： Private Sub find(x()As Integer，t As =以下为考生编写的程序= Max=x(1) For i=2 To UBound(x) If X(i)Max Then Max=x(i) End If Next tText=Max =考生编写的程序结束= End Sub Private Sub Command2 Click() =以下为考生编写的程序= For i=1 To UBound(a) C(i)=a(i)+b(i) Next =考生编写的程序结束= Open AppPath &“out51txt“ For Output
19、 As#1 For i=0 To 9 Print#1，C(i) Next Close#1 End Sub 步骤 2：按要求将文件保存至考生文件夹中。 步骤 3：按键运行程序，先单击“读数据”按钮，再单击“合并数组”按钮，最后单击“找最大值”按钮。)解析：解析：本题中自定义过程 fmd 的功能是找出数组参数 x()中的最大值，并且将其放入文本框参数 t中。其基本思路为：首先利用 Ubound 函数获得数组的长度，然后假设数组的第一个数为最大值，再由数组的第二个数直到最后一个数进行循环，在循环中对数组元素和最大值进行比较，二者中较大的数存入最大值变量，循环结束后将最大值显示在 t 中。 在“合并数组”按钮的单击事件中，利用 For 循环依次将a、b 数组中同下标的元素相加并且放入数组 c 中。
