计算机二级考试vb复习试题及答案.docx

计算机二级考试vb复习试题及答案

2016计算机二级考试vb复习试题及答案 今年第二次计算机等级考试即将开始了，yjbys为帮助大家巩固vb基础知识，下面为大家分享的是计算机等级考试vb复习试题，同学们赶紧来学习吧! 1.基本操作(2小题，每小题15分，共计30分) (1)在名称为Form1标题为“选课”的窗体上画一个复选框数组，名称为CH1，共有四个复选框，按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”，其中“语文”、“计算机”复选框处在选中状态下，运行时的窗体如图所示。请画控件并设置相应属性。 (2)在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容;再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在运行时，单击“复制”菜单项，则把Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。 PrivateSubclear_Click() Text2.Text="" '或Me.Text2.Text="" '或Form1.Text2.Text="" EndSub PrivateSubcopy_Click() Text2.Text=Text1.Text '或Me.Text2.Text=Text1.TextText1.Text前可以加Me或Form1 '或Form1.Text2.Text=Text1.TextText1.Text前可以加Me或Form1 EndSub 2.简单应用(2小题，每题20分，计40分) (1)在考生文件夹下有一个工程文件sjt21.vbp，相应的窗体文件为sjt21.frm。其功能是产生20个0～1000的随机整数，放入一个数组中，然后输出这20个整数的平均值。程序运行后，单击命令按钮(名称为Command1，标题为“输出平均值”)，即可求出其平均值，并在窗体上显示出来(如图所示)。这个程序不完整，请把它补充完整，并能正确运行。 OptionBase1 PrivateSubCommand1_Click() DimarrN(20)AsInteger DimAverAsSingle DimSumAsInteger Randomize Fori=1To20 'arrN(i)=? arrN(i)=Int(Rnd*1000) '或arrN(i)=Fix(Rnd*1000) Nexti 'Sum=? Sum=0 Fori=1To20 'Sum=? Sum=Sum+arrN(i) Nexti 'Aver=? Aver=Sum/20 PrintAver EndSub (2)在考生目录下有一个工程文件sjt22.vbp，窗体中的两个滚动条分别表示红灯亮和绿灯亮的时间(秒)，移动滚动框可以调节时间，调节范围为1-10秒。刚运行时，红灯亮。单击“开始”按钮则开始切换：红灯到时后自动变为黄灯，1秒后变为绿灯;绿灯到时后自动变为黄灯，1秒后变为红灯，如此切换(如图所示)。 所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的`?改为正确内容。 提示：在三个图片框picture1、picture2、picture3中分别放置了红灯亮、绿灯亮、黄灯亮的图标，并重叠在一起，当要使某个灯亮时，就使相应的图片框可见，而其他图片框不可见，并保持规定的时间，时间到就切换为另一个图片框可见，其他图片框不可见。 Dimred,green PrivateSubCommand1_Click() '?=HScroll1.Value red=HScroll1.Value green=HScroll2.Value 'Timer1.Enabled=? Timer1.Enabled=True EndSub PrivateSubTimer1_Timer() IfPicture1.VisibleThen red=red-1 Ifred=0Then Pict