1、国家二级 VB机试（上机操作）模拟试卷 200及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画 1个命令按钮，其名称为 C1，标题为 “等级考试 ”；再画 1个文本框，名称为 T1，如图 2-107(a)所示。请编写适当的事件过程，使程序运行后，一旦文本框中的信息有任何变化或输入任何信息，则命令按钮消失，并使命令按钮的标题在文本框中华显示出来，如图 2 107(b)所示。 注意：存盘时，将文件保存至考生文件夹下，窗体文件名为 sjtl frm，上程文件名为 sjtl vbp。(2)在名称
2、为Forml、标题为 “菜单演示 ”的窗体上画一个名称为 Label1、标题为空的标签：再建立一个菜单，各菜单项的属性设置见下表。窗体外观如图 2 108(a)所示。请编写适当的程序，使得选中 “输出窗体标题 ”菜单项时，就在标签中显示窗体标题；选中 “输出当前时间 ”菜单项时，在标签中显示当前系统时问 (如图 2 108(b)所示 )。要求程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时，将文件保存至考生文件夹下，窗体文件名为 sjt2 frm，工程文件名为 sjt2 vbp。 二、简单应用题 2 (1)在考生文件央下有一个工程文件 sit3 vbp，运行情况如图 2 113所
3、示。程序的功能是计算表达式的值： z=(x一 2)!+(x一 3)!+(x-4)!+(x N)! 其中的 N和 x值通过键盘分别输入到两个文奉框 Text1、 Text2中。单击名称为 Command1、标题为 “计算 ”的命令按钮，则计算表达式的值，并将计笄 =结果显示在名称为 Label1的标签中。 在窗体义件中已经给出了全部控件和程序，但程序不完整，请去掉程序中的汴释符，把程序中的 ?改为正 确内容。 要求：程序调试通过后，必须按照如图 2 113所示输入 N=5， x=12，然后计算 z的值，并将计算结果显示在标签Label1中，否则没有成绩。 注意：不能修改程序的其他部分和控件属性。
4、最后把修改后的文件按原文件名存盘。 (2)在考生文件央下有一个工程文件 sjt4 vbp。窗体上有名称为 Labell的标签和名称为 Timerl的计时器控件。该程序的功能足在名称为 Labell的标签中循环显示不同的字符串。程序开始运行，在标签中显示 “第一项 ”(如图 2 114所示 )，且每隔 1秒钟依次显示 “第二项 ”、 “第三项 ”、 “第四项 ”，如此循环。在给出的窗体文件中已经有了全部控件和程序，但程序不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。三、综合应用题 3 在考生目录下有一个工
5、程文件 sit5 vbp，其窗体上有两个标签 L1和 L2，标题分别为 “口令 ”和 “允许次数 ”；一个命令按钮 C1，标题为 “确定 ”；两个文本框名称分别为 Text1和 Text2。其中 Text1用来输入口令 (输入时，显示 “*”)，无初始内容；Text2的初始内容为 3。并给 出了 C1的事件过程，但不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容，使得在运行时，在 Textl中输入口令后，单击 “确定 ”按钮，如果输入的是 “123456”，则在 Text1中显示 “口令正确 ”；如果输入其他内容，单击 “确定 ”按钮后，弹出如图 2 147所示的错误提示对话框，并
6、目Text2中的数字减 1。最多可输入 3次几令，若 3次都输入错误，则禁止再次输入。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。国家二级 VB机试（上机操作）模拟试卷 200答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中画一个文本框和一个命令按钮，设置相关属性，其属性及值如表 3 60所示。 步骤 2：打开代码编辑窗口，编写文本框的 Change事件过程。 参考代码： Private Sub T1一 Change() C1 ViSible=False T1 Text=C1 Capt
7、ion End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，按表361在窗体中画出控件并 设置其相关属性步骤 2：选择【工具】 【菜单编辑器】命令，打开菜单设计器，按表 3 62中的设置建立菜单项。步骤 3：打开代码编辑窗口，编写两个底层菜单命令的单击事件过稗。 参考代码： Private Sub ClockClick() Labell Caption=Time End Sub Private Sub TitleClick() Labell Caption=Forml Caption End Sub 步骤 4：按要求将
8、文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打开考生文件中的本题工程文件 sit3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： tmp=1 tmp=temp*i xn=tmp z=z+xn(t) 步骤 2：按 键键运行程序，在第一个文本框中输入 5，第两个文本框中输入12，然后单击 “计算 ”按钮。 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件中的本 题工程文件 sit4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的
9、内容。 参考代码： arr=Array(”第一项 ”， ”第 aM”， ”第三项 “， ”第四项 ”) Static i As Integer Labell Caption=arr(i) i=0 步骤 2：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生义件中的奉题工程文件 sjt5 vbp，将文本框 Textl的PasswordChar属性值设置为 “*”。 步骤 2：在代码编辑窗口，去掉程序中的注释袢 “”，将问号 “?”改为正确的内容。 参考代码： If Text1 Text=“123456”Then Textl PasSWOrdChar=” If Text2 Text0 Then Textl Enabled=False 步骤 3：按要求将文件保存至考生文件夹中。
