2004年全国计算机等级考试二级VB全真上机试题解析(共6页).doc

上传人:飞****2 文档编号:16672024 上传时间:2022-05-18 格式:DOC 页数:6 大小:59.50KB
返回 下载 相关 举报
2004年全国计算机等级考试二级VB全真上机试题解析(共6页).doc_第1页
第1页 / 共6页
2004年全国计算机等级考试二级VB全真上机试题解析(共6页).doc_第2页
第2页 / 共6页
点击查看更多>>
资源描述

《2004年全国计算机等级考试二级VB全真上机试题解析(共6页).doc》由会员分享,可在线阅读,更多相关《2004年全国计算机等级考试二级VB全真上机试题解析(共6页).doc(6页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

1、精选优质文档-倾情为你奉上 2004年全国计算机等级考试二级VB全真上机试题解析 第1题: 在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为计算、存盘,如图所示。并有一个函数过程isprime可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击计算按钮,则找出小于18000的最大的素数,并显示在Text1中;单击存盘按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。 本题的考查主要有两个,一个是循

2、环,一个是文件的访问。 由于在小于18000中寻找最大素数,并且判断素数的函数已经给出,只要使用一个循环在18000以下寻找,没有找到减一再寻找,找到记录在Text1.Text中,在结构化的程序中不再提倡GoTo以及从结构体中退出(例如ExitFor等),使用While判断是一个较好的选择。 第2题: 在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经有两个文本框,名称分别为Text1、Text2;和一个命令按钮,名称为C1,标题为确定;请画两个单选按钮,名称分别为Op1、Op2,标题分别为男生、女生;再画两个复选框,名称分别为Ch1、Ch2,标题分别为体育、音乐。请编写适当的事件过程,

3、使得在运行时,单击确定按钮后实现下面的要求: 1)根据选中的单选按钮,在Text1中显示我是男生或我是女生。 2)根据选中的复选框,在Text2中显示我的爱好是体育或我的爱好是音乐或我的爱好是体育音乐。如图所示。 注意:不得修改已经给出的程序和已有控件的属性。在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击确定按钮。必须使用窗体右上角的关闭按钮结束程序,否则无成绩。 分析:单选按钮OptionButton和选择框CheckBox的简单应用OptionButton控件和CheckBox控件功能相似,但是二者间也存在着重要差别。在选择一个OptionButton时,同组中的其它Op

4、tionButton控件自动无效。相反,可以选择任意数量的CheckBox控件。 只要注意了这一点本题可以在C1_Click事件中判断他们的选中情况OptionButton的Value为True表示选中,CheckBox的Value=1时表示选中。 第3题: 在名称为Form1的窗体上画一个标签,名称为L1,标签上显示请输入密码,在标签的右边画一个文本框,名称为Text1,其宽、高分别为2000和300,设置适当的属性使得在输入密码时,文本框中显示*字符,此外再把窗体的标题设置为密码窗口,以上这些设置都只能在属性窗口中进行设置,运行时的窗体如图所示。*注意:存盘时必须存放在考生文件夹下,工程文

5、件名为sjt1.vbp,窗体文件名为sjt1.frm。 分析:创建的对象设置属性。属性窗口(选中对按F4调出)给出了设置所有的窗体对象属性的简便方法。在视图菜单中选择属性窗口命令、单击工具栏上的属性窗口按钮或使用控件的上下文菜单,都可以打开属性窗口。在本题中要求对于密码框的设定,只要为Text1的PasswordChar属性设置为*即可完成 第4题:在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签L1,请画一个单选按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为飞机、火车、汽车,再画一个名称为Text1的文本框。窗体文件中已经给出了Op

6、1的Click事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在运行时单击飞机或火车单选按钮时,在Text1中显示我坐飞机去或我坐火车去,单击汽车单选按钮时,在Text1中显示我开汽车去,如图所示。注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。本题考查对于OptionButton控件的了解,OptionButton控件显示一个可以打开或者关闭的选项,判断它是否被选中使用的是value属性,选中为True,反之为False。 一般在使用OptionButton控件使大多数人喜欢使用控件数组,在第一题中SelectCas语句是根据表达式的值,来决定执

7、行几组语句中的其中之一。根据后续的语句我们可以知道,这里需要根据用户的选择进行分流,分流的依据是用户选择了那一个OptionButton,这个可以由Index得到,这里填入Index,第二个空白,我们只要知道OptionButton数组从零开始,不难判断Op1(1).Caption是火车,我们只能坐,填入a即可。 第5题:在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个图片框,名称为 P1、P2,分别用来表示信号灯和汽车,其中在P1中轮流装入黄灯.ico、红灯.ico、绿灯.ico文件来实现信号灯的切换;还有两个计时器Timer1和Timer2,Timer1用于变换信号灯,黄灯1秒,

8、红灯2秒,绿灯3秒;Timer2用于控制汽车向左移动。运行时,信号灯不断变换,单击开车按钮后。汽车开始移动,如果移动到信号灯前或信号灯下,遇到红灯或黄灯,则停止移动,当变为绿灯后再继续移动。在窗体中已经给出了全部控件和程序,但程序不完整, 要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件以原文件名存盘。 本题中涉及三个事件 点击开车按钮C1_Click,汽车开始启动,由题面知道汽车的开动由Timer2控制,那么这里必须启动Timer2,所以填入Timer2.Enable=True 红绿灯由Tim

9、er1控制,在Timer1的事件Timer1_Timer中根据时间a来更换P1.Picture的图像,达到红绿灯转换的效果,如果看到其他灯已经有了,这里填入绿灯.ioc是简单的选择,仔细分析要在绿灯有三秒,也必须这样填写 最后是汽车的移动,已知是由Timer2操作的,在它的事件Timer2_Timer中要移动汽车,使用了picture的Move方法,平行向右移动,改变Left值,这里填入picture1.Left即可实现。 其他关于Timer控件以及picture控件的属性方法事件请自己参阅有关资料。 第6题: 在考生文件夹下有一个工程文件sjt5.vbp,请在窗体上画两个框架,其名称分别为F

10、1和F2,标题分别为交通工具和到达目标。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为飞机和火车。在F2中画两个单选按钮,名称分别为Op3和Op4,标题分别为广州和昆明。画一个文本框,其名称为Text1。编写适当事件过程。程序运行后,选择不同单选按钮时产生的显示结果见下表 程序的运行情况如图所示。存盘时,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。 单选按钮的Value属性: Value属性用来表示单选按钮的状态,可以取True和False两种值,取值为True时,单选按钮是打开的,按钮中心有一个圆点;取值为False时,单选按钮是关闭的,按钮是一个圆圈。 设置单

11、选按钮Value属性的语法是: 单选按钮名.Value=True(-1)或False(0) 由于Value属性是单选按钮的缺省属性,因此在设置该属性的值的时候,可以省略属性名。 解题方法: 打开工程文件sjt5.vbp,点击工具箱中的Frame控件图标,然后在窗体上拖拉出两个框架,通过属性窗口分别设置其Name属性为F1和F2,Caption属性为交通工具和到达目标。 点击工具箱中的OptionButton控件图标,然后在F1中拖拉出两个单选按钮,通过属性窗口分别设置其Name属性为Op1和Op2,Caption属性为飞机和火车。 点击工具箱中的OptionButton控件图标,然后在F2中拖

12、拉出两个单选按钮,通过属性窗口分别设置其Name属性为Op3和Op4,Caption属性为广州和昆明。 点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。 打开代码窗口,输入如下的代码: PrivateSubForm_Click() IfOp1.Value=TrueThen IfOp3.Value=TrueThen Text1.Text=坐飞机去广州 ElseIfOp4.Value=TrueThen Text1.Text=坐飞机去昆明 EndIf ElseIfOp2.Value=TrueThen IfOp3.Value=TrueThen Text1.Text=坐火车去广州 E

13、lseIfOp4.Value=TrueThen Text1.Text=坐火车去昆明 EndIf EndIf EndSub 第7题: 在考生文件夹下有一个工程文件sjt6.vbp,请在窗体上画三个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为等级考试、计算机和空白。然后画两个单选按钮,其名称分别为Op1和Op2,标题分别为交换和连接(如图所示),编写适当的事件程序。程序运行后,如果选中交换单选按钮并单击Text3文本框,则Text1文本框中内容与Text2文本框中内容进行交换,并在Text3文本框中显示交换成功;如果选中连接单选按钮并单击Text3文本框,则把Tex

14、t1和Text2的内容按Text1、Text2的顺序连接起来,并在Text3文本框中显示连接后的内容。存盘时,工程文件名为sjt6.vbp,窗体文件名为sjt6.frm。 解题方法: 打开工程文件sjt6.vbp,点击工具箱中的TextBox控件图标,然后在窗体上拖拉出三个文本框,通过属性窗口分别设置其Text属性为等级考试、计算机和。 点击工具箱中的OptionButton控件图标,然后在窗体中拖拉出两个单选按钮,通过属性窗口分别设置其Name属性为Op1和Op2,Caption属性为交换和连接。 打开代码窗口,输入如下的代码: PrivateSubText3_Click() IfOp1.V

15、alueThen Text1.Text=计算机 Text2.Text=等级考试 Text3.Text=交换成功 Else Text3.Text=Text1.Text+Text2.Text EndIf EndSub 第8题: 在Form1的窗体上画一个文本框,其名称为Text1;再画两个命令按钮, 其名称分别为C1和C2,标题分别为显示和退出,编写适当的事件过程。程序运行后,在窗体加载时使退出按钮不可用,如果单击显示按钮,则在文本框中显示等级考试,并使退出按钮可用,此时如果单击退出按钮,则结束程序,程序运行情况如图所示。 解题方法: 新建一个名为Form1的窗体,点击工具箱中的CommandBu

16、tton控件图标,然后在窗体上拖拉出两个命令按钮,通过属性窗口分别设置其Name属性为C1和C2,Caption属性为显示和退出。 点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。 打开代码窗口,输入如下的代码: PrivateSubC1_Click() C2.Enabled=True Text1.Text=等级考试 EndSub PrivateSubC2_Click() End EndSub 第9题:在Form1的窗体上画一个命令按钮,其名称为C1,标题为显示;再画 一个文本框,其名称为Text1,编写适当的事件过程。程序运行后,在窗体加载时使文本框不可见,如果双击窗体,

17、则文本框出现;此时如果单击命令按钮,则在文本框中显示等级考试。程序运行情况如图所示。 解题方法: 新建一个名为Form1的窗体,点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出一个命令按钮,通过属性窗口设置其Name属性为C1,Caption属性为显示。 点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。 打开代码窗口,输入如下的代码: PrivateSubC1_Click() Text1.Text=等级考试 EndSub PrivateSubForm_DblClick() Text1.Visible=True EndSub PrivateSubForm_

18、Load() Text1.Visible=False EndSub第10题: 在窗体上画一个文本框,其名称为Text1,Text属性为空白。再画一个命令按钮,其名称为C1,Visible属性为False。编写适当的事件过程。程序运行后,如果在文本框中输入字符,则命令按钮出现。程序运行情况如图所示。 解题方法: 新建一个窗体,点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框,通过属性窗口设置其Text属性为。 点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出一个命令按钮,通过属性窗口设置其Name属性为C1,Visible属性为False。 打开代码窗口,输入如下的代码: PrivateSubText1_Change() C1.Visible=True EndSub 按要求保存文件即完成本题。专心-专注-专业

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 教育专区 > 教案示例

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号© 2020-2023 www.taowenge.com 淘文阁