国家二级VB机试（上机操作）模拟试卷376
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1，标题为“滚动条属性设置”的窗体上画1个名称为VScroll1的垂直滚动条，设置属性，使得滚动块在最上面时，其位置值为10；滚动块在最下面时，其位置值为30；窗体刚显示时，滚动块处在中间位置，如图3—27所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为：Form1的窗体上，画1个名称为Labe11的标签，其标题为“等级考试”，显示为宋体10号字，且能根据标题内容自动调整标签的大小，并有凹陷效果，如图3—28所示。再画1个名称为Timer1的计时器控件，通过属性窗口设置有关属性，使其不可用，时间间隔为1秒。
(1)【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个垂直滚动条。按表4—18设置其相关属性。
[*]
步骤2：按要求将文件保存至考生文件夹中。
(2)【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个标签和定时器。按表4—19设置其相关属性。
[*]
步骤2：在打开的代码编辑窗口中，编写标签、窗体的Click事件代码和定时器Timer事件代码。参考代码：
Private Sub Form Click()
Timer1．Enabled＝False
End Sub
Private Sub Labe11 C1ick()
Timer1．Enabled＝True
End Sub
Private Sub Timer1 Timer()
Labe11．FontSize＝Labe11．Fontsize＋1
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.(1)考生文件夹下有一个工程文件sjt3．vbp，其窗体上有1个名称为Text1的控件数组；一个标题为”排序”的命令按钮。程序运行时，在文本框数组中输入8个整数，如图3—29(a)所示；然后单击“排序”按钮，则8个整数按降序排序，如图3—29(b)所示。
在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。
注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。
(2)在考生文件夹下有工程文件sjt4．vbp。其窗体界面如图3—30所示，可以实现以下功能：
“添加项目”按钮可以把在组合框编辑区中输入的新项目添加到组合框列表中，但不能添加重复项目；“删除项目”按钮从列表中删除选中的项目；“添加爱好”按钮把组合框编辑区中的内容追加到下面的文本框原有内容之后； “清除爱好”按钮清除该文本框内容。
在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。
(1)【操作步骤】
步骤1：打开考生文件夹中的本题工程文件sjt3．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
k＝i
For j＝i＋1 To 7
If Val(Text1(j)．Text)
Val(Text1(k)．Text)Then
Text1(k)．Text＝j
步骤2：按要求将文件保存至考生文件夹中。
(2)【操作步骤】
步骤1：打开考生文件夹中的本题工程文件sjt4．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
If Combol．Text＝Combol．List(k)Then
Combol．AddItem Combol．Text
Combol．RemoveItem Combol．ListIndex
Text1．Text ＝Text1．Text ＆ \\
解析：
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有2个标题分别是“读数据”和“统计”的命令按钮，1个名称为Text1的文本框，2个标签控件，如图3—31所示。
【操作步骤】
GetWords＝m
m＝GetWords(Text1．Text，ch)
’－－－－－－－考生编写的程序代码从这里开始
k＝0
For i＝1 To m
If Len(ch(i))＝5 Then
k＝k＋1
End If
Next i
Labe11．Caption＝k
’－－－－－－－考生编写的程序代码到这里结束
步骤2：按＜F5＞键运行程序，单击各个按钮测试验证。
步骤3：按要求将文件保存至考生文件夹中。
解析：
本文档预览：3600字符，共2996字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
