国家二级VB机试(上机操作)模拟试卷548
基本操作题
1.请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上用名称为Shape1的控件画一个圆,其直径为1500(即宽、高均为1500),并设置适当属性,使窗口标题为“圆”,窗体标题栏上不显示最大化和最小化按钮(如图1-231所示)。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体中建立一个弹出式菜单(程序运行时不显示),名称为file,含两个菜单项,其名称分别为open、save,标题分别为“打开”、“存盘”。编写适当的事件过程。程序运行后,如果用鼠标右键单击窗体,则弹出此菜单(如图1-232所示)。
第1小题
【操作步骤】
步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个形状控件,其相关属性设置如表2-114所示。
[*]
步骤2:按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1:新建一个“标准EXE”工程,选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表2-155中的设置建立菜单项。
[*]
步骤2:打开代码编辑窗口,编写窗体的事件过程以显示弹出式菜单。
参考代码:
Private Sub Form_MouseDown(Button As
Integer, Shift As Integer, X As Single,
Y As Single)
If Button = 2 Then
Call Me.PopupMenu(file)
End If
End Sub
步骤3:按要求将文件保存至考生文件夹中。
解析:
简单应用题
2.(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combo1,其中已经预设了内容;还有一个文本框Text1和三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“修改”、“确定”、“添加”。程序运行时,“确定”按钮不可用,如图1-233所示。
程序的功能是:在运行时,如果选中组合框中的一个列表项,单击“修改”按钮,则把该项复制到Text1中(可在Text1中修改),并使“确定”按钮可用;若单击“确定”按钮,则把修改后的Text1中的内容替换组合框中该列表项的原有内容,同时使“确定”按钮不可用;若单击“添加”按钮,则把Text1中的内容添加到组合框中。
所提供的窗体文件已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp,窗体中的两个滚动条分别表示红灯亮和绿灯亮的时间(秒),移动滚动框可以调节时间,调节范围为1~10秒。刚运行时,红灯亮。单击“开始”按钮则开始切换:红灯到时后自动变为黄灯,1秒后变为绿灯;绿灯到时后自动变为黄灯,1秒后变为红灯,如此切换(如图1-234所示)。
第1小题
【操作步骤】
步骤1:打开考生文件中的本题工程文件sjt3.vbp,在属性设置窗口,设置Command2的Enabled属性值为False。
步骤2:在代码编辑窗口,编写三个命令按钮按钮的单击事件过程。
参考代码:
Command2.Enabled = True
Combo1.List(Form1.Combo1.ListIndex)=T
ext1
Form1.Combo1.AddItem Text1
步骤3:按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。
参考代码:
red = HScroll1.Value
Timer1.Enabled = True
Picture1.Visible= False
green = green-1
步骤2:按要求将文件保存至考生文件夹中。
解析:
综合应用题
3.在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件是sjt5.frm(如图1-235所示)。该程序的功能是:单击“读数”按钮,读入考生文件夹下in5.txt文件中的一个整数,并放入Text1中;单击“计算”按钮,则计算小于该数的最大素数,并显示在Text2中;单击“存盘”按钮,则把该素数保存到考生文件夹下的out5.txt 文件中。要求如下:
①程序已给出“存盘”按钮的事件过程代码。“读数”按钮的事件过程和判断x是否是素数的函数prime(x)不完整,请去掉注释符,并在?处填上正确的内容,使程序完整。
②编写“计算”按钮的事件过程。计算小于Text1中数据的最大素数。
③请不要改动窗体上所有控件属性设置及相应的过程代码。最后将改动后的程序用原文件名保存。
【操作步骤】
步骤1:打开本题对应工程文件sjt5.vbp。
步骤2:打开窗体代码窗口,补充完整“读数”按钮的Click事件和判断素数的过程prime(x)。
参考代码:
Input #1, a%
prime = False
步骤3:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码:
参考代码:
n = Val(Text1.Text)
For i = n To 2 Step -1
l = prime(i)
If l = True Then
Exit For
End If
Next
Text2.Text = i
步骤4:运行程序,单击“读数”按
本文档预览:3600字符,共3694字符,源文件无水印,下载后包含无答案版和有答案版,查看完整word版点下载