1、VB 机试-试卷 10 及答案解析(总分:12.00,做题时间:90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_2.(1)在名称为 Forml 的窗体上建立一个垂直滚动条,请在属性窗口中把它的名称设置为 VSl,Max 属性设置为 50Mill 属性设置为 0Value 属性设置为 50。程序运行后,滚动块位于滚动条最下端,如图 181 所示,如果单击滚动条之外的窗体部分,则滚动块跳到最上端。 注意:只能直接为相应的属性赋值,不得使用变量。保存时必须存放在考生文件夹下,窗体文件名为 sjlfrm,工程文件名为 sjlvbp。 (2)在名称为 For
2、ml 的窗体中建立一个标签,名称为 Lablel,在标签上显示“编程语言”并设置为四号宋体;再建立 3 个复选框,名称分别为 Checkl、Check2 和 Check3,标题分别为“C+”、“Basic”和“JAVA”,字体大小均为四号宋体,加粗,其中“JAVA”被禁用,如图 182 所示。 (分数:2.00)_二、简单应用题(总题数:2,分数:4.00)3.简单应用题()(分数:2.00)_4.在考生文件夹中有工程文件 execise21.vbp 及窗体文件 execise21.frm。在名为 Form1 的窗体中有一个名为 Image1 的图像框,还有两个命令按钮(名称分别是 Cmd1
3、和 Cmd2,标题分别是“放大”和“缩小”)。要求程序运行后,单击“放大”按钮,则图像框变大:单击“缩小”按钮,则图像框变小。 (分数:2.00)_三、综合应用题(总题数:2,分数:4.00)5.综合应用题()(分数:2.00)_6.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。 在考生文件夹下有工程文件 sjt5.vbp及窗体文件 sjt5.frm,该程序是不完整的,请在有?号的地方填入正确的程序代码,然后删除?及所有注释符号(即号),但不能修改其他部分。修改后的程序文件都保存,存盘时不得修改文件夹和文件名。 本题描述如下: 在窗体上有一个名称为 Text1 的文本
4、框,三个命令按钮,名称分别是 C1、C2 和 C3,标题分别是“读入”、“加密”和“存盘”。要求程序运行后,点击“读入”按钮,将文本文件 in7.txt(该文件在考生文件夹下)中的文本信息读入文本框 Text1 中;点击“加密”按钮将 Text1 中的英文字母加密转换,并将转换后的结果显示到 Text1 中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母是“a”,则转换后的是“c”;点击“存盘”按钮,则将转换后的文本框中的文本保存到 out7.txt 文件中(该文件保存到考生文件夹下)。程序设计界面如图 12-8 所示。 (分数:2.00)_VB 机试-试卷 10 答案
5、解析(总分:12.00,做题时间:90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_解析:2.(1)在名称为 Forml 的窗体上建立一个垂直滚动条,请在属性窗口中把它的名称设置为 VSl,Max 属性设置为 50Mill 属性设置为 0Value 属性设置为 50。程序运行后,滚动块位于滚动条最下端,如图 181 所示,如果单击滚动条之外的窗体部分,则滚动块跳到最上端。 注意:只能直接为相应的属性赋值,不得使用变量。保存时必须存放在考生文件夹下,窗体文件名为 sjlfrm,工程文件名为 sjlvbp。 (2)在名称为 Forml 的窗体中建立一个标
6、签,名称为 Lablel,在标签上显示“编程语言”并设置为四号宋体;再建立 3 个复选框,名称分别为 Checkl、Check2 和 Check3,标题分别为“C+”、“Basic”和“JAVA”,字体大小均为四号宋体,加粗,其中“JAVA”被禁用,如图 182 所示。 (分数:2.00)_正确答案:(正确答案: (1)根据题意,新建“标准 EXE”工程,将一个垂直滚动条添加到窗体中,将其名称设为 VSl,Max 属性为 50,Min 属性为 0,Value 属性为 50,然后双击 Forml 窗体在 Form_Click 事件中编写如下代码: Private Sub Form_Click()
7、 VSlValue=0 End Sub 单击 按钮运行程序。并按要求保存。 (2)根据题意,新建“标准 EXE”工程,将一个标签和 3 个复选按钮添加到窗体中,标签的名称为 Iabetl,Caption 属性为“编程语言”,字体大小为四号,3 个复选按钮的名称分别为Checkl、Check2 和 Check3Caption 属性分别为“C+”、“Basic”和“JAVA”,字体均为四号宋体,且加粗,Check3 的 Value 值为 2。设置后单击 )解析:二、简单应用题(总题数:2,分数:4.00)3.简单应用题()(分数:2.00)_解析:4.在考生文件夹中有工程文件 execise21.
8、vbp 及窗体文件 execise21.frm。在名为 Form1 的窗体中有一个名为 Image1 的图像框,还有两个命令按钮(名称分别是 Cmd1 和 Cmd2,标题分别是“放大”和“缩小”)。要求程序运行后,单击“放大”按钮,则图像框变大:单击“缩小”按钮,则图像框变小。 (分数:2.00)_正确答案:(正确答案: )解析:三、综合应用题(总题数:2,分数:4.00)5.综合应用题()(分数:2.00)_解析:6.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。 在考生文件夹下有工程文件 sjt5.vbp及窗体文件 sjt5.frm,该程序是不完整的,请在有?号的
9、地方填入正确的程序代码,然后删除?及所有注释符号(即号),但不能修改其他部分。修改后的程序文件都保存,存盘时不得修改文件夹和文件名。 本题描述如下: 在窗体上有一个名称为 Text1 的文本框,三个命令按钮,名称分别是 C1、C2 和 C3,标题分别是“读入”、“加密”和“存盘”。要求程序运行后,点击“读入”按钮,将文本文件 in7.txt(该文件在考生文件夹下)中的文本信息读入文本框 Text1 中;点击“加密”按钮将 Text1 中的英文字母加密转换,并将转换后的结果显示到 Text1 中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母是“a”,则转换后的是“c”;
10、点击“存盘”按钮,则将转换后的文本框中的文本保存到 out7.txt 文件中(该文件保存到考生文件夹下)。程序设计界面如图 12-8 所示。 (分数:2.00)_正确答案:(正确答案:文本框中显示的内容由 Text 属性设置。单击命令按钮触发 Click 事件,命令按钮的标题由 Caption 属性设置。 题目要求加密原理是:在原来字符的 ASCII 码加上一个整数(题目要求为 2)转换为其他的字符,然后再将加密后的字符显示在文本框中。这样就用到了 Chr 函数和 Asc 函数。 Chr 函数返回 String,其中包含有与指定的字符代码相关的字符。其语法格式为: Chr(charcode)
11、charcode 必要参数,是一个用来识别某字符的 Long。 Asc 函数返回一个 Integer,代表字符串中首字母的字符代码。其语法格式为: Asc(string) string 必要的参数,可以是任何有效的字符串表达式。解题步骤: 第一步:编写程序代码。 程序提供的代码: Private Sub C1_Click() Dim strinfo As String ? “in7.txt“ For Input As 1 Input #1, strinfo Close #1 Text1.Text=strinfo End Sub Private Sub Command2_Click() Dim
12、strchange As String Dim i As Integer For i=1 To Len(Text1.Text) strchange=strchange+?(Asc(Mid(Text1.Text, i, 1) ) +2) Next Text1.Text=strchange End Sub Private Sub Command3_Click() Open “out7.txt“ For Output As 1 Print #1, ? Close #1 End Sub 参考代码: Private Sub C1_Click() Dim strinfo As String Open “i
13、n7.txt“ For Input As 1 Input #1, strinfo Close #1 Text1.Text=strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i=1 To Len(Text1.Text) strchange=strchange+Chr(Asc(Mid(Text1.Text, i, 1) ) +2) Next Text1.Text=strchange End Sub Private Sub C3_Click() Open “out7.txt“ For Output As 1 Print #1, Text1.Text Close #1 End Sub 第二步:调试并运行程序 第三步:按题目要求存盘)解析: