2020年计算机二级考试《VB》考前预测:简单综合应用题
国家二级VB机试(综合应用题)模拟试卷3(题后含答案及解析)

国家二级VB机试(综合应用题)模拟试卷3(题后含答案及解析) 题型有:1.1.在考生文件夹下有一个工程文件sjt5.vbp,按照要求完成以下操作:在名称为Form1的窗体上添加两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图所示)。
程序运行后,如果单击“读入数据”按钮,则调用题目所提供的ReadData1和ReadData2过程读入datain1.txt和datain2.txt文件中的各20个整数,分别放人Arr1和Arr2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素相减,其结果放入第三个数组中(第1个数组的第n个元素减去第2个数组的第n个冗素,其结果作为第3个数组的第n个元素。
这里的n为1、2…20),最后计算第3个数组各元素之和,把所求得的和在窗体上显示出来;并调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的dataout.txt文件中。
须执行一次,最后将修改后的文件以原米的文件名存盘。
正确答案:【操作步骤】步骤1:打开本题工程文件,按照题目要求建立命令按钮控件并设置命令按钮的相应属性,程序中用到的控件及属性见表3.23。
步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。
参考答案Private Sub C1 C1iCk( ) Call ReadData1’调用过程ReadData1 Call ReadData2’调用过程ReadData2 End Sub Private Sub C2 C1ick( ) Dim Arr3(1 To 20)As Integer Dim sum As Integer sum=0 For i=1 To 20’将Arr1中对应于Arr2中的教相减,结果存入Arr3中Arr3(i)=Arrl(i)-Arr2(i) sum=sum+Arr3(i)’将Arr3中的元素累加Next i Print”sum=”;sum’在窗体打印sum WriteData”dataout.txt”,sum End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
国家二级VB机试(简单应用题)模拟试卷1(题后含答案及解析)

国家二级VB机试(简单应用题)模拟试卷1(题后含答案及解析) 题型有:1.1.在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框,名称分别为P1、P2,其中的图片内容分别是一架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。
并给出了两个事件过程,但并不完整,要求:①设置Timer1的属性,使其在初始状态下不计时;②设置Timer1的属性,使其每隔0.1秒调用Timer事件过程一次;③去掉程序中的注释符,把程序中的?改为正确的内容,使得在运行时单击“发射”按钮,则航天飞机每隔0.1秒向上移动一次,当到达P2的下方时停止移动,如图所示。
注意:不能修改程序中的其他部分。
最后把修改后的文件按原文件名存盘。
正确答案:[操作步骤]步骤1:按题目要求打开工程文件,设置计时器属性,如图3.14所示。
步骤2:打开代码编辑窗口,去掉程序中的注释符“‘”,将问号改为正确的内容。
参考代码(画下划线部分是需填入的内容)Private Sub C1 Click( )Timer1.Enabled=True’单击”发射”按钮,则Timer生效End SubPrivate Sub Timer1 Timer( )StatiC a%a=a+1If P1.Top>P2.Top+P2.HeightThen’判定P1是否接触到P2P1.Move P1.Left,P1.Top—5—a,P1.Width,P1.HeightElseTimer1.Enabled=False’当P1接触到P2时Timer事件停止End IfEnd Sub步骤3:调试并运行程序,关闭程序后按题目要求存盘。
2.在考生文件夹下有一个工程文件sjt3.vbp。
窗体上有名称为Timer1的定时器,以及两条水平直线,名称分别为Line1和Line2。
请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,设置其形状为圆,并设置适当属性使其满足以下要求:①圆的顶端距窗体Form1顶端的距离为360;②圆的颜色为红色(红色对应的值为:&H000000FF&或&H=FF&),如图所示。
国家二级VB机试(综合应用题)模拟试卷21(题后含答案及解析)

国家二级VB机试(综合应用题)模拟试卷21(题后含答案及解析) 题型有:1.1.在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3—77所示。
并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。
请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.tXt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。
正确答案:步骤1:打开本题对应工程文件sjt5.vbp。
步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码。
参考代码:Private Sub C1_Click( )a%=15000Doa%=a%+1Loop Until isprime(a%)Text1.Text=a%End Sub步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码。
参考代码:Private Sub C2_Click( )Open App.Path&”\out5.txt”For Output As#1print:#1,Text1.TextClose#1End Sub步骤4:按要求将文件保存至考生文件夹中。
解析:素数的判断准则就是看该数除了1和其本身外有无其他约数。
程序设计思路:要找出大干15000的第一个素数,可以定义一个初值为15000的整型变量a,通过调用函数isprime(a),以其返回值是素数(即isprime(a))作为Do循环语句的继续循环条件,在循环体中加入语句:a=a+1,实现每执行循环体一次变量a的值增加1,当循环结束时将a的值在文本框中显示出来。
国家二级VB机试(简单应用题)模拟试卷8(题后含答案及解析)

国家二级VB机试(简单应用题)模拟试卷8(题后含答案及解析) 题型有:1.1.(1)考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则将考生文件央下in3.dat文件中的100个0~999的整数读入到数组a中;②单击“计算”按钮,则找出这100个整数中的所有水仙花数,并将它们的最大值与最小值分别显示在文本框Text1、Texl2中(注:当一个数的值等十该数中的各位数字的立方和时,此数被称为水仙花化数。
如:153=13+53+33,所以153就是一个水仙花数)。
在窗体文件中已经给出了全部控件(如图所示)和“读数据”命令按钮的事件过程以及判断一个数是否为水仙花数的通用过程。
要求编写“计算”命令按钮的事件过程。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行前,必须进行“计算”,并且必须通过单击窗体右上们的“关闭”按钮结束程序,否则无成绩。
最后,程序按原文件名存盘。
(2)在考生文件央下有一个工程文件sjt4.vbp。
请在窗体上添加一个组合框,名称为cb1,并输入三个列表项:“3”、“7”、“11”(列表项的顺序不限,但必须是这二个数字);添加一个名为Text1的文本框;再添加一个标题为“计算”、名称为C1的命令按钮,如图所示。
请编写适当的事什过程,使得在程序运行时,在组合框中选定一个数字后,单击“计算”按钮,则计箅5000以内能够被该数整除的所有数之和,并放入Text1中。
最后,按原文件名存盘。
提示:由丁计算结果较大,应使用长整型变量。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行一次计算。
并且必须用窗体右上角的关闭按钮结束程序,否则无成绩。
正确答案:(1)【操作步骤】步骤1:按照题日要求打开工程文件。
步骤2:打开代码编辑窗口,在指定位置编写如下代码。
参考答案Dim i As Integer Dim max As Integer,min As Integer max=-1 min=1000 For i=1 To 100 If isnare(a(i))Then ‘调用isnarc判断是否为水仙花教If max<=a(i)Then max=a(i) If min>=a(i)Then min=a(i)’求水仙花数中的最大值与最小值End If Next i Text1=max Text2=min 步骤3:按照题口要求调试并运行程序,如图3.18所示。
2020年计算机二级VB模拟试题及答案

2020 年计算机二级VB 模拟试题及答案1. 在待排序的元素序列基本有序的前提下,效率的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序 2.非空的循环单链表head的尾结点(由p所指向),满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3. 线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中,有利于提升模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中,准确的是(B)A)投影、选择、连接是从二维表行的方向实行的运算B)并、交、差是从二维表的列的方向来实行运算C)投影、选择、连接是从二维表列的方向实行的运算D)以上3种说法都不对10.在关系数据库中,对一个关系做投影操作后,新关系的元组个数将(A)A)等于原来关系中的元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture 属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后,Visual Basic 将显示的窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载,其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14. 要使目录列表框( 名称为Dirl) 中的目录随着驱动器列表框( 名称为Drivel) 中所选择的当前驱动器的不同而同时发生变化,则应:(A)A)在Dirl中的Change事件中,书写语句Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中,书写语句Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中,书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中,书写语句Dirl.Drive=Drivel.Drive15.设有如下声明:Dim x As Integer如果Sgn(x) 的值为-1 ,则表示x 的值是(A)A)整数B)大于0的整数C)等于0的整数D)小于0的数16.下述说法不准确的是(B)A)变量名的长度不能超过255个字符B)变量名能够包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic 变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6八2)+Abs(-6八2)+Int(-6八2) 的输出结果是(BD)A)-36B) 1C)-1D)-7219. 下面说法中,不准确的是(D)A)Cls 清除由Print 方法显示的文本或在图片框中显示的图形,并把光标移到对象的左上角(0,0)B) 当前窗体是用Picture 属性装入的图形时,也能够用Cls 方法清除C)Move方法用来移动窗体和控件,并改变其大小D)Cls 方法中的对象,能够是窗体或图片框,如果省略则清除当前窗体中显示的内容20. 假定在图片框Picturel 中装入了一个图形,为了清除该图形( 注意,清除图形,而不是删除图片框) ,应采用的准确方法是(D)A)选择图片框,然后按Del键B)执行语句P icturel. picture二Load Picture(””)C)执行语句Picturel.picture二""D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键。
全国计算机等级考试二级VB上机题库题型总结

这些题型是本套全国计算机等级考试VB所常见的。
便将此整理一下,以供大学考前使用。
祝大家能顺利通过二级。
谢谢。
上机第1套一、基本操作题(1)在名为Form1的窗体上绘制一个名为Fra1的框架,标题为"框架示例",高度为2000,宽度为3500;在框架中绘制一个文本框。
名为Txt1,高度为600,宽度为2000,其位置距框架的左边框和上边框均为800,文本框中的初始内容设置为"文本框示例"二、简单应用题(1)在考生文件夹中有一个工程文件vbsj3.vbp及其窗体文件vbsj3.frm。
在名为Form1的窗体上有一个单选按钮数组,含3个单选按钮,均没有标题。
程序功能:在运行时,如果选中一个单选按钮后,单击"显示"按钮,则根据单选按钮的选中情况,在窗体上显示"你所在的城市是北京"、"你所在的城市是上海"或"你所在的城市是天津"。
要求:①请利用属性窗口,为单选按钮依次添加标题:"北京"、"上海"和"天津",设初始选取中的是"北京",再添加一个标题为"显示"的命令按钮,如图1-3所示。
②删除程序中语句前面的注释符"'",把程序中的问号"?"改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的其他属性。
最后,将修改后的文件按原文件名保存在原文件夹中。
程序源码:Private Sub Cmd1_Click()For i = 0 To 2If Opt1(i).Value = True ThenPrint "你所在的城市是" + Opt1(i).CaptionEnd IfNextEnd Sub上机第2套题二、简单应用题(1)在考生文件夹中有一个工程文件vbsj3.vbp及其窗体文件vbsj3.frm。
国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析)

国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三.个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态见表3一1。
运行后的窗体如图3-11所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上画一个文本框,名称为Text1;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Show和Hide,标题分别为“显示”、“隐藏”,请编写适当的事件过程,使得在运行时,单击“隐藏”菜单项,则文本框消失;单击“显示”菜单项,则文本框显示出来。
运行后的窗体如图3-12所示。
要求程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
正确答案:第1小题本题只需按要求画出控件数组,并设置其Value属性。
【操作步骤】步骤1:新建一个“标准EXE”工程。
步骤2:在窗体Forml中加入一个标签和一个复选框,并用“复制”和“粘贴”的方法,生成包含三个元素的复选框数组。
步骤3:分别设置窗体和复选框数组中各元素的相关属性,其属性及值如表4.5所示。
步骤4:按要求将文件保存至考生文件夹中。
第2小题本题需用菜单设计器建立菜单,并编写“显示”和“隐藏”菜单项的单击事件过程控制文本框的visible属性变化。
【操作步骤】步骤1:新建一个“标准EXE”工程,在窗体Forml中画一个文本框,在属性设置窗口中将其Name属性值设置为Text1。
国家二级VB机试(综合应用题)模拟试卷9(题后含答案及解析)

国家二级VB机试(综合应用题)模拟试卷9(题后含答案及解析) 题型有:1.1.以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数开始,每个数都是其前面两个数之和。
在考生文件夹下有一个工程文件sjt5.vbp。
窗体中已经给出了所有控件:如图所示。
请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则计算出上述数列第n项的值,并在文本框中显示,n是选中的单选按钮后面的数值(提示:因计算结果较大,应使用长整型变量)。
注意:不能修改已经给出的程序和已有的控件的属性;在结束程序运行之前,必须选中一个单选按钮,并单击“计算”按钮以获得一个结果;必须使用窗体右上角的关闭按钮结束程序,否则无成绩。
最后把修改后的文件按原文件名存盘。
正确答案:【操作步骤】步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,在指定位置编写如下代码。
参考答案Private Sub Command1_Click( ) Dim a( )As Long Dim i As Integer Dim n As Integer ‘Opl.Count是单选按钮数目,这里用的是控件数组For i=0 To Op1.Count-1 ‘判断哪一项被选择,把它后面的数值赋给n,确定n值If Opl(i).Value=True Then n=Val(Opl(i).Caption) Exit For End If Next ReDim a(n)’重新申请空间,这里是动态申请a(1)=1 a(2)=1’数列第一项、第二项值确定For i=3 To n a(i)=a(i-1)+a(i-2)’后一项值是前两项值之和Next Text1.Text=a(n) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
2.在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
2020年计算机二级考试《VB》考前预测:简单综合
应用题
三、简单应用题
42在考生文件夹下,打开Ecommerce数据库,完成如下简单应用:
(1)使用报表向导建立一个简单报表。
要求选择客户表Customer
中所有字段;记录不分组;报表样式为随意式;列数为“1”,字段布局
为“列”,方向为“纵向”;排序字段为“会员号”,升序;报表标题
为“客户信息一览表”;报表文件名为myreport。
(2)使用命令建立一个名称为sb_view的视图,并将定义视图的命
令代码存放到命令文件pview.prg。
视图中包括客户的会员号(来自Customer表)、姓名(来自Customer表)、客户所购买的商品名(来自Article表)、单价(来自OrderItem表)、数量(来自OrderItem表)和
金额(OrderItem.单价* OrderItem.数量),结果按会员号升序排序。
参考解析:
(1)具体步骤如下:
① 从“文件”菜单中选择“新建”命令,在弹出的“新建”对话
框中选中“报表”后单击“向导”按钮。
② 在弹出的“向导选择”对话框中选择“报表向导”后单击“确定”按钮。
③ 弹出报表向导的“步骤1-字段选择”对话框,在该对话框中的“数据库和表”下面的列表框中选中Customer表,单击按钮把Customer表中的所有字段移到“选定字段”列表框中,单击“下一步”按钮。
④ 弹出报表向导的“步骤2-分组记录”对话框,不需设置,直接单击“下一步”按钮。
⑤ 弹出报表向导的“步骤3-选择报表样式”对话框,选择报表样式为“随意式”,然后单击“下一步”按钮。
⑥ 弹出报表向导的“步骤4-定义报表布局”对话框,在该对话框中设置列数为1,字段布局为列,方向为纵向,然后单击“下一步”按钮。
⑦ 弹出报表向导的“步骤5-排序记录”对话框,在“可用的字段或索引标识”列表框中选择“会员号”字段,单击“添加”按钮,把选定的“会员号”字段添加到“选定字段”列表框中,选中“升序”单选按钮,然后单击“下一步”按钮。
⑧ 弹出报表向导的“步骤6-完成”对话框,输入报表标题为“客户信息一览表”,然后单击“完成”按钮。
⑨ 弹出“另存为”对话框,输入文件名为myreport后单击“保存”按钮,报表设计完成。
本题的创建视图命令如下:
CREATE VIEW sb_view AS;
SELECT Customer.会员号,Customer.姓名,Article.商品
名,OrderItem.单价,;
OrderItem.数量,OrderItem.数量*OrderItem.单价AS金额,
FROM Ecommerce!Customer INNER JOIN Ecommerce!OrderItem;
INNER JOIN Ecommerce!Article;
ON Article.商品号=OrderItem.商品号;
ON Customer.会员号=OrderItem.会员号;
ORDER BY Customer.会员号
新建一个程序文件,输入上述命令,保存时把该程序文件命名为pview.prg。
【试题解析】
本试题考查了用SQL命令建立视图的方法,其命令格式为:
CREATE VIEW视图名AS SELECT语句
本题建立视图的SELECT语句中涉及到3个表,应在这3个表之间
建立连接。
Customer表与OrderItem表之间可根据客户号字段值相等
实行连接,OrderItem表和Article表之间应根据商品号字段值相等实行连接。
视图中还包含一个计算字段“金额”,可定义为“OrderItem.数量* OrderItem单价 AS 金额”。
排序可用ORDER BY子句来实现。
四、综合应用题
43根据“职工”数据表结构,设计一个分栏报表“职工_分
栏.frx”,要求报表设计如下:
(1)为报表添加一个页标头“职工基本情况”,并在页标题下添加
一条粗细为4磅的线条。
(2)将报表每行显示3条职工信息,并在每条记录下添加一条点线。
(3)在页脚处添加日期。
参考解析:
具体步骤如下:
① 在“命令”窗口中输入命令:CREATE REPORT 职工_分栏,进
入报表设计器。