国家二级VB机试(上机操作)模拟试卷544
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为C1、标题为“变宽”的命令按钮,窗体名称为“改变按钮大小”。编写程序,使得单击命令按钮时,命令按钮水平方向的宽度增加100。程序运行后的窗体如图1-212所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画一个名称Shape1的形状控件,画一个名称为L1的列表框,并在属性窗口中设置列表项的值为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则按照所选的值改变形状控件的形状。例如,选择3,则形状控件被设为圆形,如图1-213所示。
第1小题
【操作步骤】
步骤1:新建一个“标准EXE”工程,如表2-102在窗体中画出控件并设置其相关属性。
[*]
步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。
参考代码:
Private Sub C1_Click()
C1.Width = C1.Width + 100
End Sub
步骤3:按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1:新建一个“标准EXE”工程。
步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表2-103设置它们的相关属性。
[*]
步骤3:打开代码编辑窗口,编写列表框的事件过程:
参考代码:
Private Sub L1_Click()
Shape1.Shape = L1.Text
End Sub
步骤4:按要求将文件保存至考生文件夹中。
解析:
简单应用题
2.(1)在考生文件夹中有一个工程文件sjt3.vbp,窗体控件布局如图1-214(a)所示。程序运行时,在文本框Text1 中输入一个正整数,选择“奇数和”或“偶数 和 ”,则 在Label2中显示所选的计算类别。单击“计算”按钮时,将按照选定的“计算类别”计算小于或等于输入数据的奇数和或偶数和,并将计算结果显示在Label3中。程序的一次运行结果如图1-214(b)所示。在窗体文件中已经给出了全部控件,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。程序运行后,如果单击“开始”按钮,则图片自左向右移动,同时滚动条的滑块随之移动,每0.5秒移动一次。当图片完全移出窗体的右边界时,立即再从窗体的左边界开始重新移动,若单击“停止”按钮,则图片停止移动,如图1-215所示。在窗体文件中已经给出了全部控件,但程序不完整。
第1小题
【操作步骤】
步骤1:打开考生文件中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。
参考代码:
Call calc(i)
Lbl2.Caption = Option1(i).Caption
x = Val(Text1.Text)
If i Mod 2 = 1 Then
Label3.Caption = result
步骤2:按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1:打开考生文件夹下的本题工程文件sjt4.vbp。
步骤2:进入代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。
参考代码:
Timer1.Enabled = False
Timer1.Interval = 500
If Picture1.Left > Form1.Width Then
Picture1.Left = 0
步骤3:按要求将文件保存至考生文件夹中。
解析:
综合应用题
3.在考生文件夹中有一个工程文件sjt5.vbp,窗体如图1-216所示。运行程序时,从数据文件中读取学生的成绩。要求编写程序,统计总人数、平均分(四舍五入取整)、及格人数和不及格人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
【操作步骤】
步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,打开代码编辑窗口,编写“统计”按钮的单击事件过程。
参考代码
Text1.Text = n
Sum = 0
count1 = 0
count2 = 0
For i = 1 To n
Sum = Sum + arr(i)
If arr(i) < 60 Then
count1 = count1 + 1
Else
count2 = count2 + 1
End If
Avg = Sum / n
Next
Text2.Text = Int(Avg + 0.5)
Text3.Text = count1
Text4.Text = count2
步骤2:按要求将文件保存至考生文件夹中。
解析:
本文档预览:3600字符,共3393字符,源文件无水印,下载后包含无答案版和有答案版,查看完整word版点下载