最新计算机二级vb考试试题及答案

时间:2020-09-08 14:31:53 计算机等级 我要投稿

2016最新计算机二级vb考试试题及答案

  2016年第二次计算机等级考试即将开始了,同学们复习了吗?为帮助大家巩固vb基础知识,下面yjbys小编为大家分享的是计算机等级考试vb复习试题,同学们赶紧来学习吧!

2016最新计算机二级vb考试试题及答案

  1.基本操作(2小题,每小题15分,共计30分)

  (2)在名称为Form1的窗体上画一个图片框(名称为Picture1)、一个水平滚动条(名称为HScroll1)和一个命令按钮(名称为Command1,标题为“设置属性”),通过属性窗口在图片框中装入一个图形(文件名为pic1.jpg,位于考生目录下),图片框的高度与图形的高度相同,图片框的宽度任意(如图1所示)。编写适当的事件过程,程序运行后,如果单击命令按钮,则设置水平滚动条的如下属性:

  Min 100

  Max 1500

  LargeChange 100

  SmallChange 10

  之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。运行后的窗体如图2所示。程序中不得使用任何变量。

  Private Sub Command1_Click()

  HScroll1.Min = 100

  HScroll1.Max = 1500

  HScroll1.LargeChange = 100

  HScroll1.SmallChange = 10

  End Sub

  Private Sub HScroll1_Change()

  Picture1.Width = HScroll1.Value

  End Sub

  2.简单应用(2小题,每题20分,计40分)

  (1)在名称为Form1的窗体上画一个计时器,其名称为Timer1;再画一个图像框,其名称为Image1,在该图像框中装入一个图形文件pic.ico;然后画一个水平滚动条,其名称为HScroll1,Min属性值为100,Max属性值为1200,LargeChange属性值为100,SmallChange属性值为25,编写适当的事件过程。程序运行后,可以使图像框闪烁,其闪烁速度可以通过滚动条调节。

  提示:图像框的闪烁可以通过图像框交替地显示和隐藏来实现。

  Private Sub HScroll1_Change()

  Timer1.Interval = HScroll1.Value

  End Sub

  Private Sub Timer1_Timer()

  Image1.Visible = Not Image1.Visible

  End Sub

  (2)在考生目录下有一个工程文件sjt22.vbp,包含了所有控件和部分程序,如图所示。

  要求:1)利用属性窗口设置适当的属性:

  为List1列表框添加3个项目:宋体、黑体、楷体_GB2312;Text1文本框设置初始值为“计算机”;Hscroll1水平滚动条设置最小值和最大值分别为10和50。

  2)去掉程序中的注释符,把程序中的?改为正确的内容,完成以下功能:如果在列表框中选择一种字体,然后移动滚动条中的滚动框,则可使文本框中的文字按所选择的字体显示,并可随着滚动框的移动放大或缩小;如果不选择字体直接移动滚动框,则显示一个信息框,提示“请选择字体”。

  注意:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的'文件按原文件名存盘。

  Private Sub HScroll1_Change()

  Text1.FontSize = HScroll1.Value

  ' Text1.FontSize = ?

  If List1.Text <> "" Then

  Text1.FontName = List1.Text

  ' Text1.FontName = ?

  Else

  MsgBox "请选择字体", , ""

  End If

  End Sub

  3.综合应用(1小题,计30分)

  在考生目录下有一个工程文件sjt31.vbp,其中的窗体中有一个名为Text1的文本框,初始内容为0;一个标签;一个计时器;一个有两个元素的单选按钮数组,名称为Op1,标题依次为“1秒”、“3秒”;两个命令按钮,名称分别为C1、C2,标题分别为“开始计数”、“停止计数”,同时给出了两个事件过程,但并不完整。在运行时要完成下面的功能:

  单击一个单选按钮,可以设置计时间隔为1秒或3秒;单击“开始计数”,则Text1中的数按设定的计时间隔每次加1;单击“停止计数”,则Text1中的数不再变化。

  请按下面的要求设置属性和编写程序,以便实现上述功能:

  1)设置计时器的属性,使其在初始状态下不计时。

  2)去掉程序中的注释符,把程序中的?改为正确的内容。

  3)为两个命令按钮编写适当的事件过程,每个事件过程中只能有一条语句,不能使用变量。

  '要求考生编写的程序:

  Private Sub C1_Click()

  Form1.Timer1.Enabled = True

  '或 Timer1.Enabled = 1 或非0值

  '在 Timer1的前面可以加:Me. 、Form1. 、C2.Parent.

  End Sub

  Private Sub C2_Click()

  Me.Timer1.Enabled = False

  '或 Timer1.Enabled = False

  '在 Timer1的前面可以加:Me. 、Form1. 、C3.Parent.

  End Sub

  '提供给考生的程序:

  Private Sub Op1_Click(Index As Integer)

  ' Select Case ?

  Select Case Index

  Case 0

  Timer1.Interval = 1000

  Case 1

  Timer1.Interval = 3000

  End Select

  End Sub

  Private Sub Timer1_Timer()

  ' Text1.Text = ?.Text + 1

  Me.Text1.Text = Form1.Text1.Text + 1

  End Sub

  '答案:

  'Index

  'Text1

【2016最新计算机二级vb考试试题及答案】相关文章:

2017年9月计算机二级VB考试试题及答案06-22

2017计算机二级VB考试试题06-21

2017最新计算机二级考试C++试题及答案11-01

2016最新photoshop认证考试试题及答案08-28

2016最新司法考试冲刺试题及答案08-20

2016最新中药师考试试题及答案08-21

2016最新育婴师考试试题及答案11-11

2016最新java考试题库及答案10-04

2016最新物流师考试模拟试题及答案10-09

计算机二级Access考试试题及答案11-01