国家二级VB机试（上机操作）模拟试卷477
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画两个文本框，其名称分别为Text1和Text2，内容分别为“文本框1”和“文本框2”，编写适当的事件过程。程序运行后，如果单击窗体，则Text1隐藏，Text2显示，如图3－88(a)所示；如果双击窗体，则Text1显示，Text2隐藏，如图3－88(b)所示。
注意：程序中不得使用变量。
存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个文本框，其名称为Text1，初始内容为空白；再画一
个水平滚动条，其名称为HS1，SmallChange属性为4，LargeChange属性为10，Min属性为0，Max属性为200，编写适当的事件过程。程序运行后，如果在文本框内输入一个数值(0～200)，然后单击窗体，则把滚动条的滚动框移到相应的位置，如图3－89所示。
第1小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体中加入两个文本框并设置它们的相关属性，属性及其值如表4－56所示。
[*]
步骤2：打开代码编辑窗口，输入如下代码。参考代码：
Private Sub Form_Click( )
Text1．Visible＝False
Text2．Visible＝True
End Sub
Private Sub Form DblCIick( )
Text1．Visible＝True
Text2．Visible＝False
End Sub
步骤3：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：新建“标准EXE”工程，往窗体Form1中加入一个文本框和一个水平滚动条，分别设置它们的相关属性，属性及其值如表4－57所示。
[*]
步骤2：打开代码编辑窗口，输入如下代码。参考代码：
Private Sub Form Click( )
HS1．Value＝Val(Text1．Text)
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．tim，在窗体上有一个命令按钮(名称为Command1，标题为“计算并输出”)和两个文本框(名称分别为Text1和Text2)，如图3－90所示。程序运行后，单击命令按钮，即可计算出数组Arr中10个数的正数之和pos与负数之和neg，并分别在两个文本框中显示出来。
该程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分，也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。
(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm。
在窗体上有两个命令按钮，其名称分别为Command1、Command2；一个标签，其名称为Label1；一个计时器，其名称为Timer1，如图3－91(a)所示。程序运行后，如果单击“开始”命令按钮，则该按钮变为禁用，而标题变为“继续”，同时标签中的字体每隔100毫秒增大0．1倍(即变为原来的1．1倍)，如图3－91(b)所示，字体大小超过100后，自动缩小为8；如果单击“停止”命令按钮，则该按钮变为禁用，“继续”命令按钮变为有效，同时标签中的字体停止变化；再次单击“继续”命令按钮后，标签中的字体继续变化。
第1小题
【操作步骤】
步骤1：打开考生文件夹下的工程文件sjt3．vbp。
步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的-内容。参考代码：
If Arr(k)＞0 Then
pos＝pos＋Arr(k)
neg＝neg＋Arr(k)
步骤3：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：打开考生文件夹下的工程文件sjt4．vbp。
步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
Command1单击事件中改错
Timer1．Enabled＝True
Command2单击事件中改错
Timer1．Enabled＝False
Timer1单击事件中改错
If Label1．FontSize＜100 ThenLabel1．Fontsize＝Label1．FontSize *1．1
步骤3：按要求将文件保存至考生文件夹中。
解析：
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3，标题分别是“显示”、“统计”和“保存”。运行程序时，单击“显示”按钮，从文件。in5．txt中读取文本，并显示在文本框Text1中，如图3－92所示。单击“统计”按钮，则统计Text1中字母R、T、D(不区分大小写)出现的次数，统计结果分别保存在窗体变量intR、intT、intD中，同时显示在文本框Text2中(显示格式不限)。单击“保存”按钮，可将intR、intT、intD中的数据保存到考生文件夹下out5．txt文件中。
【操作步骤】
步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
Line Input ＃1，str1
Text1．Text＝str1
步骤2：按指定位置编写“统计”按钮的单击事件过程。参考代码：
Private Sub Command2_Click( )
Dim i As Integer
本文档预览：3600字符，共3707字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
