国家二级VB机试（上机操作）模拟试卷512
基本操作题
1.请根据以下各小题的要求设计Visual Basic 应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画三个单选按钮，其名称分别为Option1、Option2 和 Option3，如图1－65
（a）所示，然后通过属性窗口设置窗体和单选按钮的属性，实现如下功能：
①窗体标题为“设置单选按钮属性”；
②三个单选按钮的标题分别为“按钮1”“按钮2”和“按钮3”；
③初始状态时，第一个单选按钮为“选中”；
④程序运行后，第二个单选按钮“禁用”；
⑤程序运行后，第三个单选按钮不可见。
程序的运行情况如图1－65（b）所示。
要求：不编写任何代码。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上画一个命令按钮和一个垂直滚动条，其名称分别为Command1和VScroll1，编写适当的事件过程。程序运行后，如果单击命令按钮，则按如下要求设置垂直滚动条的属性：Max＝体高度，Min=0，LargeChange＝50，SmallChange＝10
如果移动垂直滚动条的滚动框，则在窗体上显示滚动框的位置值。程序的运行情况如图1－66所示。
第1小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中画三个单选按钮，并设置它的相关属性，其属性及值如表2－12所示。
[*]
步骤2：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，在窗体Form1中画一个命令按钮和一个垂直滚动条，在属性设置窗口中设置其相关属性，其属性及值如表2－13所示。
[*]
步骤2：打开代码编辑窗口，分别编写命令按钮的Click事件过程和垂直滚动条的Change 事件过程。
参考代码：
Private Sub Command1_Click()
VScroll1.Max = Form1.Height
VScroll1.Min = 0
VScroll1.LargeChange = 50
VScroll1.SmallChange = 10
End Sub
Private Sub VScroll1_Change()
Print Form1.VScroll1.Value
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.（1）在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。其功能是产生0个0～1000的随机整数，放入一个数组中，然后输出这20个整数中小于500 的所有整数之和。程序运行后，单击命令按钮（名称为 Command1，标题为“输出小于500的整数之和”），即可求出这些整数的和，并在窗体上显示出来（如图1－67所示）。这个程序不完整，请把它补充完整，并能正确运行。
第1小题
【操作步骤】
步骤1：打开考生文件中的本题工程文件sjt3.vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。
参考代码：
arrN(i) = Int(Rnd * 1000)
Sum = 0
If arrN(i) ＜ 500 Then
Sum = Sum + arrN(i)
步骤2：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：打开考生文件下的本题工程文件sjt4.vbp，
在代码编辑窗口，编辑Fun 函数的内容。
参考代码：
Sum = 0
For i = 0 To 100 Step 2
Sum = Sum + i * i
Next i
Fun = Sum
步骤2：按要求将文件保存至考生文件夹中。
解析：
综合应用题
3.在考生文件夹下有一个工程文件sjt5.vbp，相应的窗体文件为sjt5.frm，此外还有一个名为datain.txt 的文本文件，其内容如下：
32437658281298573142536475869713243546576879805937
程序运行后单击窗体，将把文件datain.txt 中的数据输入到二维数组Mat 中，在窗体上按5行、5列的矩阵形式显示出来，并输出矩阵右上-左下对角线上的数据，如图1－68所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能
正确运行。
【操作步骤】
步骤1：打开本题对应工程文件sjt5.vbp。
步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。
参考代码：
Dim Mat%(M, N)
Open App.Path & \\
解析：
本文档预览：3600字符，共3087字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
