1、国家二级 VB机试（上机操作）模拟试卷 251及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画一个文本框，其名称为 T1，宽度和高度分别为 1400、400；再画两个命令按钮，其名称分别为 c1和 C2，标题分别为 “显示 ”和 “扩大 ”，编写适当的事什过程。程序运行后，如果单击 C1命令按钮，则在文本框中显示“等级考试 ”，如图 2 88(a)所示；如果单击 C2命令按钮，则使文本框在高、宽方向上各增加一倍，文本框中的字体大小扩 大到原来的 3倍，如图 2 88(b)所示。注意：要求
2、程序中不得使用变量。存盘时必须存放在考生文件夹下，工程文件名为sjtl vbp，窗体文件名为sjtl frm (2)在名称为 Forml的窗体上画一个命令按钮，其名称为 C1，标题为 “转换 ”；然后再画两个文本框，其名称分别为 Text1和 Text2，初始内容均为空白，编写适当的事件过程。程序运行后，在 Textl中输入一行英文字符串，如果单击转换按钮，则 Textl文奉框中的字母都变为小写，而 Text2中的字母都变为人写。例如，在 Text1中输入 visual basic programming，则单击转换按钮后，结果如图 2-89所示。 注意：不得使用任何变量。存盘时必须存放在考生
3、文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sit2 frm。 二、简单应用题 2 (1)在考生文件夹下有一个工程文件 sjt3 vbp，相应的窗体文件为 sjt3 frm。在窗体上有一个名称为 Commandl、标题为 “计算 ”的命令按钮；两个水甲滚动条，名称分别为 Hscroll1和 Hscroll2，其 Max属性均为 100， Min属性均为 1；四个标签，名称分别为 Label1、 Label2、 Label3和 Label4，标题分别为 “运算数 1”、 “运算数 2”、 “运算结果 ”和空白：此外还有一个包含四个单选按钮的控件数组，名称为Optionl，标题分别为
4、“+”、 “ ”、 “*”和 “ ”，如图 2 75(a)所示。程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击计算按钮，相应的计算结果将显示在 Label4中，程序运行情况如图2 75所示。这个程序不完整，请把它补充完整，并能正确运行。 要求：去掉程序中的注释符，把程序中的 ?改为正确的内容，使其能正确运行，但 不能修改程序中的其他部分，也不能修改控件的属性。最后川原来的文件名保存工程文件和窗体文件。 (2)在考生文件夹下有一个上柙文件 sit4 vbp，相应的窗体文件为 sjlt4 frm。在窗体上有一个命令按钮，其名称为 Commandl，
5、标题为 “输入显示 ”；此外还有一个文本框，其名称为 Text1，初始内容为空白。程序的功能是，程序运行后，单击命令按钮，显示输入对话框，在对话框中输入某个月份的数值 (1 12)，然后单击 “确定 ”按钮，即可在文本框中输出该月份所在的季节。例如输入 5，将输出 “5月份是夏季 ”，如图2 76所示。程序不完整，请补充完整。 要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp。程序功能为：在文本框 Textl中输入一个正整数 N后，单
6、击 “计算 ”按钮，则计算 11+22+33+N N，并将计算结果显示在 Text2中。程序中的函数 f可以计算 mm的值。 在给出的窗体文件中已经有了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的 ?改为正 确的内容，并编写相应的程序，实现程序的功能，并且必须在运行时计算 N=8时的结果。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，必须计算 N=8时的结果，否则无成绩。 国家二级 VB机试（上机操作）模拟试卷 251答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如
7、表3 49在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写两个命令按钮的单击事件过程。 参考代码： Private Sub C1一 Click() T1=“等级考试 ” End Sub Private Sub C2一 Click() T1 Height=2*Me T1 Height T1 Width=2*T1 Width T1 FontSiZe=3*Forml T1 FontSize End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表 3-50在窗体中出控件并设置其相关 属性。步骤 2：打开代码
8、编辑窗口，编写命令按钮的单击事件过程。 参考代码： Private Sub CIClick() Textl Text=LCase(Textl Text) Text2 Text=UCase(Textl Text) End Sub 步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： If Optionl(i)=True Then Select Case opt Label4 Caption=Str(Hsbl Value) ” opt&Str(Hsb2 Value) ”=” Str(Result) 步骤 2：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件夹中的小题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： Loop Until n0 And n键运行稗序，在文本框中输入 8，单击 “计算 ”按钮。
