1、国家二级 VB 机试(上机操作)-试卷 95 及答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画出如图 2-48 所示的三角形。下表给出了直线 Linel、Line2 的坐标值,请按此表画 Line1、Line2,并画出直线 Line3,从而组成如图 248 所示的三角形。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sitlvbp,窗体文件名为 sitlfrm。 (2)在名称为 Forml 的窗体上画一个名称为List1
2、 的列表框,并任意输入若干列表项:再画一个名称为 Textl 的文本框,无初始内容。淆编写 List1和 Text1 的 Click 事件过程。程序运行后,如果单击列表框中的某一项,则在文本框中显示该项相应的顺序号,若单击第一项,则在文本框中显示 1;若单击第二项,则在文本框中显示 2,以此类推(如图 249所示);如果单击文奉框,则把该列表项的内容显示在文本框中。 注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt2vbp,窗体文件名为sit2frm。 (分数:2.00)_二、简单应用题(总题数:1,分数:2.00)2.(1)在名称为
3、Forml 的窗体上面一个名称为 Text1 的文本框:画两个标题分别为“对齐方式”、“字体”,名称分别为 Frame1、Frame2 的框架;在 Frame1 框架中画三个单选按钮,标题分别为“左对齐”、“居中”、“右对齐”,名称分别为 Option1、Option2、Option3:在 Frame2 框架中画两个单选按钮,标题分别为“宋体”、“黑体”,名称分别为 Option4、Option5。 要求:编写五个单选按钮的 Click 事什过程,使程序运行时,单击这些惟选按钮,可以对文本框中的文字实现相应的操作(如图 2219 所示)。 注意:要求程序中不得使用变量,每个事什过程中只能写一条
4、语句。存盘时必须存放在考生文件夹下,工程文仲名为 sjt3vbp,窗体文件名为 sjl3frm。 (2)在考生文件夹下有一个工程文件 sjt4vbo。其窗体上有一个圆,相当于一个时钟,当程序运行时通过窗体的 Activate 事件过程在圆上产生 1 两个刻度点,并完成其他初始化工作:另有长、短 2 条(红色、蓝色)直线,名称分别为 Line1 和 Line2,表示两个指针。程序运行时,单击“开始”按钮,则每隔 05 秒 Linel(长指针)顺时针转动一个刻度,Line2(短指针)顺时引转动 11 两个刻度(即长指针转动一圈,短指针转动一个刻度),单击“停止”按钮,两个指针停止转动,如图 2-2
5、20 所示。 在窗体文件中已经给出了全部控件,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。 提示:程序中的符号常量 x0、y0 是圆心到窗体左上角的距离,radius 是圆的半径。 注意:不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。 (分数:2.00)_三、综合应用题(总题数:1,分数:2.00)3.在考生文件夹下有一个工程文件 sit5vbp,含三个窗体,标题分别为“启动”、“注册”、“登录”,运行时显示“肩动”窗体,单击其上按钮时弹出对应窗体进行注册或登录。注册信息放在全局数组 users中,注册用户数(最多 10 个)放在全局变量 n 中
6、(均已存标准模块中定义)。 注册时用户名不能重复,且“口令”与“验证口令”须相同,注册成功则在“启动”窗体的标签中显示“注册成功”,否则显示相应错误信息。登录时,检验用,、名和口令,若正确,则在“启动”窗体的标签上显示“登录成功”,否则显示相应错误信息。标准模块中函数 finduser 的功能是:在 users 数组中搜索用户名(即参数 ch),找剑则返回该用户名在 users 中的位置,否则返回 0。已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把 Form2、Form3 窗体文件中的?改为正确的内容。 注意:不得修改已经存在的程序和控件的属性,最后程序按原文件名存盘。(分数
7、:2.00)_国家二级 VB 机试(上机操作)-试卷 95 答案解析(总分:6.00,做题时间:90 分钟)一、基本操作题(总题数:1,分数:2.00)1.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上画出如图 2-48 所示的三角形。下表给出了直线 Linel、Line2 的坐标值,请按此表画 Line1、Line2,并画出直线 Line3,从而组成如图 248 所示的三角形。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sitlvbp,窗体文件名为 sitlfrm。 (2)在名称为 Forml 的窗体上画一个名称
8、为List1 的列表框,并任意输入若干列表项:再画一个名称为 Textl 的文本框,无初始内容。淆编写 List1和 Text1 的 Click 事件过程。程序运行后,如果单击列表框中的某一项,则在文本框中显示该项相应的顺序号,若单击第一项,则在文本框中显示 1;若单击第二项,则在文本框中显示 2,以此类推(如图 249所示);如果单击文奉框,则把该列表项的内容显示在文本框中。 注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt2vbp,窗体文件名为sit2frm。 (分数:2.00)_正确答案:(正确答案:第 1 小题 【操作步骤】 步
9、骤 1:新建一个“标准 EXE”工程,按表 329 在窗体中画出控件并设置其相关属性。 步骤 2:按要求将文件保存至考生文件夹中。 第 2 小题 【操作步骤】 步骤 1:新建一个“标准 EXE”工程,按表 330 在窗体中画出控件并设置其相关属性。 步骤2:打开代码编辑窗口,编写列表框和文本框的单击事件过程。 参考代码: Private Sub ListlClick() TextlText=ListlListIndex+1 End Sub Private Sub TextlClick() TextlText=ListlList(ListlListIndex) End Sub 步骤 3:按要求将
10、文件保存至考生文件夹中。)解析:二、简单应用题(总题数:1,分数:2.00)2.(1)在名称为 Forml 的窗体上面一个名称为 Text1 的文本框:画两个标题分别为“对齐方式”、“字体”,名称分别为 Frame1、Frame2 的框架;在 Frame1 框架中画三个单选按钮,标题分别为“左对齐”、“居中”、“右对齐”,名称分别为 Option1、Option2、Option3:在 Frame2 框架中画两个单选按钮,标题分别为“宋体”、“黑体”,名称分别为 Option4、Option5。 要求:编写五个单选按钮的 Click 事什过程,使程序运行时,单击这些惟选按钮,可以对文本框中的文字
11、实现相应的操作(如图 2219 所示)。 注意:要求程序中不得使用变量,每个事什过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文仲名为 sjt3vbp,窗体文件名为 sjl3frm。 (2)在考生文件夹下有一个工程文件 sjt4vbo。其窗体上有一个圆,相当于一个时钟,当程序运行时通过窗体的 Activate 事件过程在圆上产生 1 两个刻度点,并完成其他初始化工作:另有长、短 2 条(红色、蓝色)直线,名称分别为 Line1 和 Line2,表示两个指针。程序运行时,单击“开始”按钮,则每隔 05 秒 Linel(长指针)顺时针转动一个刻度,Line2(短指针)顺时引转动 11 两
12、个刻度(即长指针转动一圈,短指针转动一个刻度),单击“停止”按钮,两个指针停止转动,如图 2-220 所示。 在窗体文件中已经给出了全部控件,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。 提示:程序中的符号常量 x0、y0 是圆心到窗体左上角的距离,radius 是圆的半径。 注意:不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。 (分数:2.00)_正确答案:(正确答案:第 1 小题 【操作步骤】 步骤 1:新建一个“标准 EXE”工程,如表 3-116 在窗体中画出控件并设置其相关属件。 步骤 2:在代码编辑窗口,分别编写 5 个按钮的单击事件
13、过程。 参考代码: Private Sub Optionl _Click() TextlAlignment=0 End Sub Private Sub Option2Click() TextlAlignment=2 End Sub Private Sub Option3 Click() TextlA1ignment=1 End Sub Private Sub Option4 Click() TextlFont=“宋体“ End Sub Private Sub Option5 一 Click() TextlFont=”黑体” End Sub 步骤 3:按要求将文件保存至考生文件夹中。 )解析:三
14、、综合应用题(总题数:1,分数:2.00)3.在考生文件夹下有一个工程文件 sit5vbp,含三个窗体,标题分别为“启动”、“注册”、“登录”,运行时显示“肩动”窗体,单击其上按钮时弹出对应窗体进行注册或登录。注册信息放在全局数组 users中,注册用户数(最多 10 个)放在全局变量 n 中(均已存标准模块中定义)。 注册时用户名不能重复,且“口令”与“验证口令”须相同,注册成功则在“启动”窗体的标签中显示“注册成功”,否则显示相应错误信息。登录时,检验用,、名和口令,若正确,则在“启动”窗体的标签上显示“登录成功”,否则显示相应错误信息。标准模块中函数 finduser 的功能是:在 us
15、ers 数组中搜索用户名(即参数 ch),找剑则返回该用户名在 users 中的位置,否则返回 0。已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把 Form2、Form3 窗体文件中的?改为正确的内容。 注意:不得修改已经存在的程序和控件的属性,最后程序按原文件名存盘。(分数:2.00)_正确答案:(正确答案:【操作步骤】 步骤 1:打开考生文件中的本题工程文件 sjt5vbp,在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: 一注册窗体 Form2 一 n=n+1 ElseIf finduser(Trim$(Textl) 0 Then FormlLabe11Caption=“注册成功!” 一登录窗体Form3 一 If k=0 Then ElseIf Trim$(Text2) users(k, 2) Then 步骤 2:按要求将文件保存至考生文件夹中。)解析: