国家二级VB机试（上机操作）模拟试卷475
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮，窗体标题为“改变窗体背景色”。编写程序，使得单击命令按钮时，将窗体的背景颜色改为红色(＆HFF＆)。运行程序后的窗体如图3－78所示。
要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个名称Shape1的形状控件，在属性窗口中将其设置为圆形。画一个名称为IAst1的列表框，并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项，则将所选的值作为形状控件的填充参数。例如，选择3，则形状控件中被竖线填充。如图3－79所示。
第1小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中画一个命令按钮，设置相关属性，其属性及值如表4－49所示。
[*]
步骤2：打开代码编辑窗口，编写按钮的Click事件过程中。参考代码：
Priva．te Sub C1_Click( )
Form1．BackColor＝＆HFF＆
End Sub
步骤3：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：新建一个“标准EXE”工程。
步骤2：在窗体Form1中加入一个列表框和一个形状控件，并分别如表4－50设置它们的相关属性。
[*]
步骤3：打开代码编辑窗口，编写列表框的Click事件过程。参考代码：
Private Sub List1 Click( )
Shape1．FillStyle＝List1．Text
End Sub
步骤4：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.(1)在考生文件夹下有一个工程文件sjt3．vbp。程序的功能是通过键盘向文本框中输入正整数。
在“除数”框架中选择一个单选按钮，然后单击“处理数据”按钮，将大于文本框中的正整数且能够被所选除数整除的5个数添加到列表框List1中，如图3－80所示。在窗体文件中已经给出了全部控件，但程序不完整。
要求：请去掉程序中的注释符，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4．vbp。程序运行后，单击“开始”按钮，图片自上而下移动，同时滚动条的滑块随之移动，每0．5秒移动一次。
当图片顶端移动到距窗体的下边界的距离少于200时，再回到窗体顶部，重新向下移动，
如图3－81所示。在窗体文件中已经给出了全部控件，但程序不完整。
第1小题
【操作步骤】
步骤1：打开考生文件下的本题工程文件sjt3．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
If Option1．Item(i)＝True Then
y＝Val(Optionl(i)．Caption)
Do While i＜＝5
List1．AddItem x
步骤2：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：打开考生文件夹下的工程文件sjt4．vbp。
步骤2：进入代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
Timer1．Interval＝500
VScroll1．Value＝Picture1．Top
Picture1．Tom＝0
步骤3：按要求将文件保存至考生文件夹中。
解析：
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，窗体如图3－82所示。运行程序时，从数据文件中读取学生的成绩(均为整数)。要求编写程序，统计总人数，并统计不及格、60～69、70～79、80～89及90～100各分数段的人数，将统计结果显示在相应的文本框中。结束程序之前，必须单击“保存”按钮，保存统计结果。
【操作步骤】
步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，
在代码编辑窗口的指定位置编写以下代码。参考
代码：
Text1．Text＝n
count1＝0：count2＝0：count3＝0
count4＝0：count5＝0：count6＝0
For i＝1 To n
Y＝Int(arr(i)／10)
Select Case Y
Case 1，2，3，4，5
count1＝count1＋1
Case 6
count2＝count2＋1
Case 7
count3＝count3＋1
Case 8
count4＝count4＋1
Case 9，10
count5＝count5＋1
End Select
Next
Text2．Text＝count1 ：Text3．Text＝
count2
Text4．Text＝count3 ：Text5．Text＝
count4
Text6．Text＝count5
步骤2：按＜F5＞键运行程序，先单击“统计”按钮，再单击“保存”按钮。
步骤3：按要求将文件保存至考生文件夹中。
解析：
本文档预览：3600字符，共3526字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
