国家二级VB机试（上机操作）模拟试卷548 (题后含答案及解析)
题型有：1.vbp，窗体文件名为sjt1.frm。    （2）在名称为Form1的窗体中建立一个弹出式菜单（程序运行时不显示），名称为file，含两个菜单项，其名称分别为open、save，标题分别为“打开”、“存盘”。编写适当的事件过程。程序运行后，如果用鼠标右键单击窗体，则弹出此菜单（如图1－232所示）。    注意：程序中不能使用变量。保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：第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：按要求将文件保存至考生文件夹中。 
vb开始按钮代码简单应用题
2． （1）在考生目录下有一个工程文件sjt3.vbp，窗体上有一个组合框Combo1，其中已经预设了内容；还有一个文本框Text1和三个命令按钮，名称分别为Command1、Command2、Command3，标题分别为“修改”、“确定”、“添加”。程序运行时，“确定”按钮不可用，如图1－233所示。    程序的功能是：在运行时，如果选中组合框中的一个列表项，单击“修改”按钮，则把该项复制到Text1中（可在Text1中修改），并使“确定”按钮可用；若单击“确定”按钮，则把修改后的Text1中的内容替换组合框中该列表项的原有内容，同时使“确定”按钮不可用；若单击“添加”按钮，则把Text1中的内容添加到组合框中。    所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。    （2）在考生目录下有一个工程文件sjt4.vbp，窗体中的两个滚动条分别表示红灯亮和绿灯亮的时间（秒），移动滚动框可以调节时间，调节范围为1～10秒。刚运行时，红灯亮。单击“开始”按钮则开始切换：红灯到时后自动变为黄灯，1秒后变为绿灯；绿灯到时后自动变为黄灯，1秒后变为红灯，如此切换（如图1－234所示）。    所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?
改为正确的内容。    提示：在三个图片框picture1、picture2、picture3中分别放置了红灯亮、绿灯亮、黄灯亮的图标，并重叠在一起，当要使某个灯亮时，就使相应的图片框可见，而其他图片框不可见，并保持规定的时间，时间到就切换为另一个图片框可见，其他图片框不可见。    注意：考生不得修改工程中已经存在的内容和控件属性，最后把修改后的文件按原文件名存盘。
正确答案：第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所示）。该程序的功能是：单击“读数”按钮，读入考生文件夹下文件中的一个整数，并放入Text1中；单击“计算”按钮，则计算小于该数的最大素数，并显示在Text2中；单击“存盘”按钮，则把该素数保存到考生文件夹下的 文件中。要求如下：    ①程序已给出“存盘”按钮的事件过程代码。“读数”按钮的事件过程和判断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：运行程序，单击“读数”按钮进行读数，然后单击“计算”按钮进行计算，最后单击“存盘”按钮保存计算结果。    步骤5：按要求将文件保存至考生文件夹中。 

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。