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

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

1、VB机试模拟试卷 179及答案与解析 一、基本操作题（ 30分） 1 在名为 Form1的窗体上建立一个名为 Lab1的标签：两个名称分别为 Cmd1和Cmd2，标题分别为 “显示广和 “显示 2”的命令按钮。编写适当的事件过程，使程序运行后、若单击 “显示广命令按钮，则在标签卜显示字符串 Cmd；如果单击 “显示2”命令按钮，则在标签上显示字符串 Cmd2。如下图所示。注意： 不要使用任何变量，直接显示字符串；文件必须存放在考生文件夹中，窗体文件名为 execise62.frm，工程文件名为execise62.vbp。 二、简单应用题（ 40分） 2 在名为 Form1的窗体中绘制一个名为

2、Text1的文本框，其初始值为 “0”；再添加一个名为 Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，每隔一秒钟文本框中的数字加 1。如下图所示的是程序刚启动时的情况。 注意： 程序中不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为 execise49.vbp，窗体文件名为execise49.frm。 三、综合应用题（ 30分） 3 在考生文件夹下有一个工程文件 sj5 vbp，其窗体上有一个文本框 ，名称为Textl，可以多行显示；还有 3个命令按钮，名称分别为 Command1、 Command2和Command3，标题分别为 “打开文件 ”、

3、“大写 ”和 “保存 ”。程序运行时的窗体界面如图 245所示。 命令按钮的功能是：单击 “打开文件 ”按钮，弹出打开文件对话框，默认打开文件的类型为 “文本文件 ”。选择考生文件夹下的in5 txt文件后，该文件中的内容显示 Textl中；单击 “大写 ”按钮，程序将把 Text1中的所有小写英文字母转换成大写；单击 “保存 ”按钮，把 Text1中的内容存入考生文件夹下的 out5 txt文件 中。在窗体中已经给出了部分程序。 注意：考生不得修改已有的程序和控件的属性，必须对考生文件夹下的 in5 txt文件进行转换，并把转换结果通过 “存盘 ”按钮存入考生文件夹下的 out5 txt文件

4、中，否则会影响成绩。 VB机试模拟试卷 179答案与解析 一、基本操作题（ 30分） 1 【正确答案】 二、简单应用题（ 40分） 2 【正确答案】 三、综合应用题（ 30分） 3 【正确答案】 本题主要考查通用对话框使用、顺序文件的打开和 Ucase()函数的使用。 通用对话框 (CommonDialog)提供打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框，该控件运行时不可见。其Action属性用于设置被打开对话的类型， Filter(过滤器 )属性用于指定在对话框的文件列表中显示文件的类型。例如，过滤器为 * txt表示显示所有的文本文件。语法为 “对象名

5、 Filter=“描述 |文件扩展名 ”。 首先要根据 ASCII码来判断是否为小写字母，然后再用 Ucase函数将小写字母转换为大写字母，补充后的具体代码如下： Dim str AS String Private Sub Commandl_Click() Dim tmp As String str=“ Commonl Filter=“文本文件 (* txt)|* txt“ Commonl ShowOpen If Commonl FileName “Then Open Commonl FileName For Input As#1 如果文件存在则进行读取 While EOF(1)=False判

6、断是否读取完成 Input#1， trap str=str+tmp将读取的字符串放入 str Wend End If Close#1 Textl Text=str在 Textl中显示读取的字符串 End Sub Private Sub Command2_Click() Textl Text=UCase(Textl Text) End Sub Private Sub Command3_Click() Open“App Path& out5 txt“For Output As#1 Print#1， Textl Text将修改后 的字符串写入文件中 Close#1 End Sub单击 按钮运行程序，并按要求保存。