[计算机类试卷]VB机试模拟试卷38及答案与解析.doc

《[计算机类试卷]VB机试模拟试卷38及答案与解析.doc》由会员分享，可在线阅读，更多相关《[计算机类试卷]VB机试模拟试卷38及答案与解析.doc（5页珍藏版）》请在麦多课文档分享上搜索。

1、VB机试模拟试卷 38及答案与解析 一、基本操作题（ 30分） 1 新建一个工程。在窗体上画一个文本框，名称为 Text1。设置用户输入的字母一律转换为大写表示，焦点保持在输入文本的最右端。程序运行结果如图 5所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylcl.vbp，窗体丈件名为ylcl.frm。 2 新建一个工程，在窗体中创建一个标签，名字是 Label1。要求实现的功能是：单击窗体后，在标签控件中显示三号字体的字符串 “为人民服务 ”。程序运行结果如图6所示。程 序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc2.v

2、bp，窗体文件名为ylc2.frm。 二、简单应用题（ 40分） 3 新建一个工程。在窗体中画两个文本框，名称分别为 Textl和 Text2，没有初始内容。建立一个下拉菜单，标题为 “操作 ”。该菜单有两个菜单项，名称分别为 item1和 item2，标题分别为 Copy和 Clear。编写一个事件过程，程序运行后，单击 Copy菜单项，则把 Text1中的内容复制到 Text2中；单击 Clear菜单项，则清除 Text1和Text2内容。 如图 15所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc3.vbp，窗体文件名为ylc3.frm 三、综合应

3、用题（ 30分） 4 新建一个工程，在窗体中创建两个文本框，其名称分别为 Text1和 Text2。编写一个事件过程，实现在程序运行后，若在文本框 Text1中输入一个字符串。若该字符串超过 15个字符后，超出部分在文本框 Text2中显示。如图 12所示程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc4.vbp，窗体文件名为 ylc4.frm。 VB机试模拟试卷 38答案与解析 一、基本操作题（ 30分） 1 【正确答案】 (1)Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择“标准 Exe”。创建窗体 Form1。 (2)在工

4、具箱中选择文本框控件，在窗体中画出文本框。在属性窗口中设置 Text属性为空。双击文本框弹出代码编写窗口，添加如下代码： Private Sub Text1_Change() Textl.Text=LCase(Text1.Text) Textl.SelStart=Len(Text1.Text) End Sub (3)按 F5键运行程序。如图 5所示。 (4)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为 ylcl.vbp，窗体文件命名为 ylcl.frm。 【试题解析】 (1)第 1小题中要使用字符转换函数 LCase，其作用是将所有大写字符转换为小写。 SelStart属性用来返回或

5、者设置所选择的文本的起始点，可用来处理焦点。 2 【正确答案】 (1) Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择“标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择标签控件，在窗体中画出一个标签。在其属性窗口中，将Visible属性改为 False， Caption属性设置为 “为人民服务 ”，双击 Font属性，将字体大小设置为三号字。 (3)双击标签弹出代码窗口，在其中输入如下代码： Private Sub Form_Click() Labell.Visible=True End Sub (4)按 F5键运行程序。如图 6所示。 (5)执行

6、“文件 ”“ 保存工程 ”命令，将工程文件命名为 ylc2.vbp，窗体文件命名为 ylc2.frm。 【试题解析】 (2)第 2小题考查的仍然是对 Visible属性的操作。可参见前面的讲解。 二、简单应用题（ 40分） 3 【正确答案】 Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择 “标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择文本框控件，在窗体上创建两个文本框，名称分别为 Text1和 Text2。 (3)单击工具栏中的按钮，进入菜单编辑器。如图 32所示。 (4)在菜单编辑器中分别填入标题和名称。单击：下一个 ”按钮建立下一个菜单，单击

7、将该菜单设置为下级菜单。选中后输入标题和名称。全部设置完毕后 选择 “确定 ”。 (5)选择 Clear对象添加以下代码： Private Sub Clear_Click(index As Integer) Text1.Text=“ “ Text2.Text=“ “ End Sub 选择 Copy对象，添加以下代码： Private Sub Copy_Click(index As Integer) Text2.Text=Text1.Text End Sub (6)按 F5键运行程序。如图 15所示。 (7)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为ylc3.vbp，窗体文件命名为

8、ylc3.frm。 【试题解析】 (3)第 3小题中主要考查了对菜单编辑器的使用，包括设置菜单的属性与对菜单的 Click事件的处理。 三、综合应用题（ 30分） 4 【正确答案】 (1)Visual Basic集成环境中，执行 “文件 ”“ 新建工程 ”命令，选择“标准 Exe”。创建窗体 Form1。 (2)在工具箱中选择文本框控件，在窗体上创建两个文本框。双击文本框 Text1，弹出代码窗口，添加如下代码： Private Sub Text1_Change() If Len(Text1.Text) =15 Then Text2.SetFocus End If End Sub (3)按 F5键运行程序。如图 12所示。 (4)执行 “文件 ”“ 保存工程 ”命令，将工程文件命名为ylc4.vbp，窗体文件命名为 ylc4 fi-m。 【试题解析】 (4)第 4小题中利用了 SetFocus来控制焦点。当 Text1窗口中 的字符串超过长度时，焦点转移到文本框 Text2中。