【计算机类职业资格】VB机试-试卷10及答案解析.doc

《【计算机类职业资格】VB机试-试卷10及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】VB机试-试卷10及答案解析.doc（3页珍藏版）》请在麦多课文档分享上搜索。

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 第二步：调试并运行程序 第三步：按题目要求存盘)解析：