2012全国计算机二级VB机试模拟题.doc

精选优质文档-倾情为你奉上1第1小题【审题分析】要实现在程序运行时，单击命令按钮，使标签和文本框消失，在窗体上显示文本框中的内容，其实就是在命令按钮的单击事件过程中，设置标签和文本框的Visible属性值为False，用窗体的print方法将文本框的内容输出到窗体上。【操作步骤】步骤1：新建一个"标准EXE"工程，在窗体上画一个标签、一个文本框和一个命令按钮，其属性及其值如表91-1所示。表91-1步骤2：在代码编辑窗口，编写"显示"按钮的Click事件过程。参考代码：Private Sub cmdDisplay_Click() Print txtInput.Text lblInput.Visible = False txtInput.Visible = FalseEnd Sub步骤3：按要求将文件保存至考生文件夹中。【主要考点】控件画法、简单事件编程。第2小题【知识点播】Date函数用于获取当前系统日期，Time函数用于获取当前系统时间。AutoSize属性用来确定是否根据Caption属性指定的标题自动调整标签的大小，可以设置为True或False。【审题分析】本题只需在"日期"按钮的单击事件过程中，通过调用Date函数在标签中显示当前系统日期；在"时间"按钮的单击事件过程中，通过调用Time函数在标签中显示当前系统时间。【操作步骤】步骤1：新建一个"标准EXE"工程，按表91-2在窗体中画出控件并设置其相关属性。表91-2步骤2：在代码编辑窗口编写以下事件过程。参考代码：Private Sub cmdDate_Click() Label1.Caption = DateEnd SubPrivate Sub cmdTime_Click() Label1.Caption = TimeEnd Sub步骤3：按要求将文件保存至考生文件夹中。【主要考点】Date函数、Time函数。2第1小题【审题分析】判断整数A能被整数B整除的条件表达式为：A Mod B=0。本题源程序在"计算数据"的单击事件过程中，通过For循环逐一判断单选按钮数组中的每个元素是否选中，用变量y记录选中单选按钮所标识的数字，并调用过程"calc"计算满足条件的正整数。在过程"calc"中，通过Do循环依次判断大于文本框中数的正整数是否能被变量y整除，将能被整除的前5个数添加到列表框Lst1中。【操作步骤】步骤1：打开考生文件下的本题工程文件vbsj3.vbp，在代码编辑窗口，去掉程序中的注释符"'"，将问号"？"改为正确的内容。参考代码：If Opt1(i).Value = True Then y = Val(Opt1(i).Caption)Do While i <=5Lst1.AddItem x步骤2：按要求将文件保存至考生文件夹中。第2小题【审题分析】本题源程序在"统计得分"按钮的单击事件过程中，先检查是否在文本框中输入了编号及各评委的打分，若没输入则给出提示信息，并等待用户输入。接着用变量Max、Min和Sum分别记录选手的最高得分、最低得分及总得分，他们的初值均设置为第一位评委的打分（即txtScore(0).Text）。然后通过For循环逐一与其他评委的打分相比（循环变量n的初值应为1），若Max的值小于某评委的打分（即Case Is > Max），则将该评委的打分赋值给Max；若Min的值大于某评委的打分（即Case Is < Min），则将该评委的打分赋值给Min。计算总分的表达式应为：Sum = Sum + Val(txtScore(n)（或Sum = Val(txtScore(0) + Val(txtScore(n)）。最后将选手编号和计算出的得分用Print方法显示在图片框Pic1中，并将所有文本框的内容置空。【操作步骤】步骤1： 打开考生文件下的本题工程文件vbsj4.vbp，按表91-3在窗体中画出控件并设置其相关属性。表91-3步骤2：在代码编辑窗口，去掉程序中的注释符"'"，将问号"？"改为正确的内容。参考代码：For n = 1 To 9Case Is > MaxCase Is < MinSum = Sum + Val(txtScore(n)步骤3：按要求将文件保存至考生文件夹中。3【知识点播】“冒泡法”是一种重要的数据排序算法，它的核心思路是按顺序让一个数列中的每一个数都与它之后的所有的数逐一进行比较，如果该数大于其后面的数，则把这两个位置的数进行交换。通过这样的循环，最终按照从小到大的顺序排列出该数列。【审题分析】单击“添加”按钮时先检查当前已输入学生信息数n是否已达到10条，若没达到10条，则标记变量tag_in=0表示允许添加信息（且学生信息数n增1），否则tag_in=1。当tag_in=0时，接着检查是否输入学号，若没输入学号则提示用户输入，且学生信息数n应减1（即n=n-1）；若已输入学号，则将该学生信息存入记录数组元素stud(n)，其中保存学号的语句为：stud(n).Num=txtNum。在“排序”按钮的单击事件过程中，源程序利用“冒泡法”对记录数组中的元素按平均分从大到小进行排序。故该事件过程中，第1个？处应改为：j，第2个？处应改为：Average，第3个？处应改为：stud(j)。最后在For循环中，用图片框的Print方法在图片框中显示每个学生的3项信息。【操作步骤】步骤1：打开考生文件下的本题工程文件vbsj5.vbp，在代码编辑窗口，去掉程序中的注释符“'”，将问号“？”改为正确的内容。参考代码：n = n - 1stud(n).Num = txtNumFor k = j To nIf stud(k).Average > stud(j).Average Thenstud(k) = stud(j)步骤2：按要求将文件保存至考生文件夹中。专心-专注-专业