1、VB机试模拟试卷 37及答案与解析 一、基本操作题（ 30分） 1 创建名称为 Form1的窗体，在该窗体上画一个文本框，名称为 Text1，文本框中初始内容为 Visual Basic。在文本框的右边画一个垂直滚动条，名称为 VScrolll。滚动条的高度为 3000，宽度为 375。在图片框的下方画一个命令按钮，名称为Command1，标题为 “清除 ”。文本框的宽度为 2000，高度为 600，如图 3所示。编写一个事件过程，使程序运行后，单击 “清除 ”按钮，文本框中的文字被清除。程序中不得使用任何变量。 注意：存盘时必须 存放在考生文件夹下，工程文件名为ylcl.vbp，窗体文件名为
2、 ylcl.frm。二、简单应用题（ 40分） 2 新建一个工程，在窗体中创建一个水平滚动条，名称为 HS1， Min属性为 0，Max属性为 200，以及一个命令按钮，名称为 “Command1”，标题为 “显示位置 ”。编写一个事件过程，要求程序运行后将滚动块移到某个位置后，如果单击 “显示 ”按钮，则在窗体上显示滚动框当前所在位置的值。程序中不得使用任何变量。程序运行结果如图 11所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为ylc3.vbp，窗 体文件名为 ylc3.frm。 三、综合应用题（ 30分） 3 新建一个工程，在窗体中创建上下两个文本框，分 9U为 Textl和
3、Text2。要求实现的功能是：在 Text1中输入字符串， Text2中显示全部转换为大写字母的相应字符串。程序运行情况如图 8所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc4.vbp，窗体文件名为 ylc4.frm。VB机试模拟试卷 37答案与解析 一、基本操作题（ 30分） 1 【正确答案】 (1)Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择“标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择文本框控件，在标签下方画出文本框，在文本框属性窗口中，将 Height屑性设置为 600、 Width属性设置为
4、2000、 Text属性设置为 Visual Basic。 (3)在工具箱中选择标签控件，在标签的属性窗口中，将 Height属性设置为3000、 Width属性设置为 375。 (4)在工具箱中选择命令按钮，在 文本框的下方画出一个命令按钮，在属性窗口中将 Caption属性设置为 “清除 ”。双击按钮弹出代码窗口，编写事件过程如下； Private Sub Command1_Click() Text1. Text=“ “ End Sub (5)按 F5键运行程序。如图 3所示。 (6)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为 ylc1.vbp，窗体文件命名为 ylcl.frm
5、。 二、简单应用题（ 40分） 2 【正确答案】 (1)Visual Basic集成环境中，执行 “文 件 ”“ 新建工程 ”命令，选择“标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择水平滚动条控件，在其属性窗口中设置名称为 HS1， Min属性为 0， Max属性为 200。 (3)在工具箱中选择命令按钮控件，将其 Caption属性值设置为 “显示位置 ”。双击 “显示 ”按钮弹出代码窗口，添加如下代码： Private Sub Command1_Click() Print VS1.Value End Sub (4)按F5键运行程序。如图 11所示。 (5)执行 “文件 ”“
6、 保存工程 ”命令，将工程文件命名为 ylc3.vbp，窗体文件命名为 ylc3.frm。 【试题解析】 (3)第 3小题主要考查了水平滚动条控件的 Value属性。 三、综合应用题（ 30分） 3 【正确答案】 Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择 “标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择标签控件，在窗体中要求位置画出两个标签，其 Caption属性分别为 “初始字符 ”和 “转换后 ”。 (3)在工具箱中选择文本框控件，在窗体中画出两个文本框： Text1和 Text2，并且在属性窗口中设置 Text属 性为空。双击文本框 Text1弹出代码编写窗口，添加如下代码： Private Sub Text1_Change() Text2.Text=UCase(Text1.Text) End Sub (4)按 F5键运行程序。如图 8所示。 (5)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为 ylc4.vbp，窗体文件命名为 ylc4.frm。 【试题解析】 (4)第 4小题使用了字符转换函数 UCase，其作用是将所有小写字符转换为大写。
