国家二级VB机试（上机操作）模拟试卷291
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框，名称为Text1，内容为“VB程序设计”；再画两个命令按钮，其名称分别为Command1和Command2，标题分别为“扩大”和“缩小”，如图3—93所示，编写适当的事件过程。程序运行后，每单击Command1命令按钮一次，文本框中文本的字体扩大1．2倍；每单击Command2单选按钮一次，文本框中文本的字体缩小1．2倍。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjjt1．frm。
(2)在名称为Form1的窗体上画一个列表框，其名称为List1，通过属性窗口向列表框中输入9个项目，分别为10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Text1，初始内容为空白；再画一个水平滚动条，其名称为HScroll1，Min属性和Max属性分别为0和100，如图3—94(a)所示，编写适当的事件过程。程序运行后，如果单击列表框中的某个项目，则在文本框中显示该项目内容，并把滚动条的滚动框移到相应的位置，如图3—94(b)所示。要求：不得使用任何变量。
第1小题
步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个文本框和两个命令按佣，其相关属件设置如表4—58所示。
[*]
步骤2：打开代码编辑窗口，输入如下代码。
参考代码：
Private Sub Command1_Click()
Text1．FontSize=Text1．FontSize*1．2
End Sub
Private Sub Command2_CliCk()
Text1．FontSize=Text1．FontSize／1．2
End Sub
步骤3：按要求将文件保存至考生文件夹中。
第2小题
步骤1：新建一个“标准EXE”工程，在窗体上画一个列表框、一个文本框和一个水平滚动条，按表4—59设置其相关属性。
[*]
步骤2：在打开的代码编辑窗口中，编写列表框的单击事件代码。
参考代码：
Private Sub List1_Click()
Text1．Text=List1．Text
HScroll1．Value=Val(List1．Text)
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：第1小题：要实现题目要求的功能，只需在两个命令按钮的Click事件过程中，分别设置文本框的FontSize属性为指定值。
第2小题：列表框的Text属性用于返回列表框中选择的项目的内容，返回值总与列表框的List(ListIndex)属性的返回值相同。本题需要在列表框的属性窗口中输入列表框中的项目，然后在列表框的单击事件中将选定项赋值给文本框和滚动条的Value属性。
简单应用题
2.(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．frm。
在名称为Form1的窗体上有一个名称为Text1的文本框和名称为Command1、标题为“确定”的命令按钮，一个名称为List1的列表框和两个名称分别为Option1和Option2、标题分别为“添加”和“删除”的单选按钮，如图3—95(a)所示。程序运行后，如果选择单选按钮Option1并在文本框中输入一个字符串，然后单击“确定”命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图3—95(b)所示；如果选择列表框中的一项和单选按钮Option2，并单击“确定”命令按钮，则删除列表框中所选择的项目，如图3—95(c)所示；如果不选择列表框中的项目，或者没有在文本框中输入字符串，则单击“确定”命令按钮后，将显示一个信息框“未输入或未选择项目”，如图3—95(d)所示。该程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。
(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm。
在窗体上有一个命令按钮，其名称为Command1，标题为“计算”。程序运行后，如果单击命令按钮，程序将根据下面的公式计算π的值：π／4=1-1／3+1／5-1／7+……，所提供的窗体文件已给出了命令按钮的事件过程，程序运行结果如图3—96所示。
该程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。
第1小题
步骤1：打开考生文件夹中的本题工程文件sjt3．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。
参考代码：
List1．AddItem Text1．Text
If Form1．Option2．Value=True And
List1．ListIndex＞=0Then
List1．RemoveItem List1．ListIndex
步骤2：按要求将文件保存至考生文件夹中。
第2小题
步骤1：打开考生文件夹中的本题工程文件sjt4．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。
参考代码：
Result=Result+Sign*1／i
Sign=-Sign
Text1．Text=Result*4
步骤2：按要求将文件保存至考生文件夹中。
解析：第1小题：单击列表框中的某个项目，将触发其Click事件。要实现单击列表框中的某一项，该项就从列表中消失的功能，只需在Click事件过程中编写删除项目的语句即可。列表框的ListIndex属性可返回当前选择的项目的索引号，因此删除选中项目的语句为：List1．RemoveItem List1．ListIndex。
第2小题：本题是一个数列求累加和的问题。这个数列的特点是，每一项的分子都是1，分母都是前一项分母加2。符号都是前一项符号的相反数。凶此，这个数列累加求和问题使用循环来完成，在循环中令分母加2，符号取反即得到下一项。循环结束后需要将累加和乘4才能得到所求的圆周率的值。
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．frm。窗体外观如图3—5(a)所示。三个命令按钮的名称分别为Command1、Command2和Command3，标题分别为“读取数据”、“首字母大写”和“存盘”。程序运行后，如果单击“读取数据”命令按钮，则读取考生文件夹下in5．txt中的全部文本(文本中的单词与单词之间或标点符号与单词之间均用一个空格分开)，并在文本框中显示出来。文本内容如下：
Tuckeddeepwithinthepromi
本文档预览：3600字符，共4778字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
