国家二级VB机试（上机操作）模拟试卷492
基本操作题
1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为CDl的通用对话框，通过属性窗口设置CD1的初始路径为C：＼，默认的文件名为None，标题为“保存等级考试”，如图3－160所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0，标题为“菜单命令”的主菜单，再添加两个名称分别为“menu1”、“menu2”，标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单，并且使程序运行时，menu1子菜单不可用，menu2子菜单已经选中(运行时的效果如图3－161所示)。
第1小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，选择【工程】→【部件】命令，在弹出的“部件”对话框的列表中选中“MicroSoft Common Dialog Contro16．0”项目，单击“确定”按钮。
步骤2：在窗体Form1上画一个通用对话框并设置相关属性。
步骤3：编写Form1的Load事件，加入的代码：CD1．ShowSave
步骤4：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：新建一个“标准EXE”工程，打开VB菜单设计器按要求设计菜单。
步骤2：打开代码编辑窗口，编写“上一菜单项可用”命令的Click事件过程。参考代码：
Private Sub menu2_Click( )
menu1．Enabled＝True
End Sub
步骤3：按要求将文件保存至考生文件夹中。
解析：
简单应用题
2.(1)在考生文件夹中有工程文件sjt3．vbp，其中的窗体如图3－162所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中。
请去掉程序中的注释符，把程序中的“?”改为正确的内容。
注意：考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹中有一个工程文件sjt4．vbp。窗体上已有控件，如图3－163所示。请在属性窗口中将List1设置为可以多项选择(允许使用Shift键或Ctrl键进行选择)列表项。要求：双击List1中的某一项时，该项目被添加到List2中，同时在List1中清除该项目。若单击“＞＞”按钮，List1中所有的项目显示在List2中(List2中已有项目不变)，List1中的内容不变。
要求：按照题目要求设置控件属性，去掉程序中的注释符，把程序中的“?”改为正确的内容。
第1小题
【操作步骤】
步骤1：打开考生文件夹下的工程文件sjt3．vbp，在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
If Option1．Value＝True Then
If a(i)＞＝x Then
x＝a(i)
End If
ElseIf a(i)＜y Then
y＝a(i)
End If
步骤2：按要求将文件保存至考生文件夹中。
第2小题
【操作步骤】
步骤1：打开考生文件夹中的本题工程文件sjt4．vbp，代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码：
L2．AddItem L1．List(L1．ListIndex)
L1．RemoveItem L1．ListIndex
For i＝0 To LiSt1．LiStCount－1
Call MoveItem(List1，List2)
步骤2：按要求将文件保存至考生文件夹中。
解析：
综合应用题
3.在考生文件夹中有一个工程文件sjt5．vbp，如图3－164所示。运行程序时，从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时，将统计矩阵两个对角线的元素中能被3整除的个数，统计结果显示在标签lblFirst中；同时计算矩阵主对角线的元素之和，计算结果显示在标签lblSecond中。
【操作步骤】
步骤1：打开考生文件夹下的工程文件sjt5．vbp，在代码编辑窗口的指定位置编写以下代码。参考代码：
For k＝1 To N
Sum＝Sum＋a(k，k)
If a(k，k)／3＝Int(a(k，k)／3) Then
Counter＝Counter＋1
End If
If k＜＞N－k＋1 Then
If a(k，N－k＋1)／3＝Int(a(k，N－k＋1)／3)Then
Counter＝Counter＋1
End If
End If
Next
iblSecond．Caption＝Sum
iblFirst．Caption＝Counter
步骤2：按＜F5＞键运行程序，然后单击“计算”按钮。
步骤3：按要求将文件保存至考生文件夹中。
解析：
本文档预览：3600字符，共3270字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
