产生20个0~1000的随机整数,放入一个数组逆序输出中,然后输出这2...

程序改错_百度文库
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
评价文档:
上传于||暂无简介
大小:16.26KB
登录百度文库,专享文档复制特权,财富值每天免费拿!
你可能喜欢计算机等级考试学习网,提供全国计算机等级考试辅导、ncre考试时间、计算机等级考试报名、等考历年真题模拟试题答案、计算机等级考试成绩查询、一级MS Office、一级WPS Office、一级B、二级公共基础知识、二级C语言程序设计、二级C++语言程序设计、二级Delphi语言程序设计、二级Java语言程序设计、二级Visual Basic语言程序设计、二级Visual FoxPro数据库程序设计、二级Access数据库程序设计、三级PC技术、三级信息管理技术、三级网络技术、三级数据库技术、四级网络工程师、四级数据库工程师、四级软件测试工程师、计算机职业英语一级等信息。
您当前的位置:&>&&>&&>&&>&&>&
  1. 基本操作(2小题,每小题15分,共计30分)
  注意:下面出现的“考生文件夹”均为%USER%
  请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
  (1)在名称为 Form1的窗体上画一个标签,其名称为Label1,然后通过属性窗口设置窗体和标签的属性,实现如下功能:
  1)窗体标题为“设置标签属性”
  2)标签的位置为:距窗体左边界500,距窗体顶边界300
  3)标签的标题为“等级考试”
  4)标签可以根据标题的内容自动调整其大小
  5)标签带有边框
  程序的运行情况如图所示。
  要求:
  不编写任何代码。
  *注意:
  存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
  解题思路:
  启动Visual Basic系统,创建一个Form1窗体。
  该窗体上画一个标签控件,通过其属性窗口将名称设为Label1,距窗体左边(Left属性)设为500,距窗体顶 部(Top属性)设为300,标题(Caption属性)设为“等级考试”,标签大小自动调整(AutoSize属性)设为True, BorderStyle属性设为1。激活Form1窗体,通过其属性窗口将标题(Caption属性)设为“设置标签属性”。
  参考文件:c:\wexam\\hlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw
  请把这些文件复制到c:\wexam\中,然后打开sjt1.vbp文件并运行。
  (2)在名称为 Form1的窗体上画一个命令按钮和一个水平滚动条,其名称分别 为Command1和HScroll1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置水平滚动条的属性:
  Max = 窗体宽度
  Min = 0
  LargeChange = 50
  SmallChange = 10
  而如果移动水平滚动条的滚动框,则在窗体上显示滚动框的位置值。
  程序的运行情况如图所示。
  要求:
  不得使用任何变量。
  *注意:
  存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件 名为sjt2.frm。
  解题思路:
  启动Visual Basic系统,创建一个Form1窗体。
  在该窗体上画一个命令按钮控件,通过其属性窗口将名称设为Command1。画一个水平滚动条控件,通过其属性窗口将名称设为HScroll1。
  单击命令按钮(即运行Click事件过程),在该Click事件过程中加入语句:
  Private Sub Command1_Click()
  HScroll1.Max = Form1.Width
  HScroll1.Min = 0
  HScroll1.LargeChange = 50
  HScroll1.SmallChange = 10
  End Sub
  移动水平滚动条的滚动框(即运行Change事件过程),在该Change事件过程中加入语句:
  Private Sub HScroll1_Change()
  Print Me.HScroll1.Value
  End Sub
  参考文件:c:\wexam\\hlpsys\参考答案\sjt2.vbp、sjt2.frm、sjt2.vbw
  请把这些文件复制到c:\wexam\中,然后打开sjt1.vbp文件并运行。
  2. 简单应用(2小题,每题20分,计40分)
  注意:下面出现的“考生文件夹”均为%USER%
  (1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。 其功能是产生20个0~1000的随机整数,放入一个数组中,然后输出这20 个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为 “输出平均值”),即可求出其平均值,并在窗体上显示出来(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。
  要求:
  去掉程序中的注释符,把程序中的 ?改为正确的内容,使其实现上述功 能,但不能修改程序中的其他部分。 最后把修改后的文件按原文件名存盘。
  解题思路:
  启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体文件名为sjt3.frm。由于所提供的窗体程序不完整,在“输出平均值”按钮的Private Sub Command1_Click()事件过程中,有 四处地方需要修改。
  1) 将语句
  ’arrN(i) = ?
  arrN(i) = Int(Rnd * 1000)
  2) 将语句
  ’Sum = ?
  Sum = 0
  3) 将语句
  ’Sum = ?
  Sum = Sum + arrN(i)
  4) 将语句
  ’Aver = ?
  Aver = Sum / 20
  参考文件:c:\wexam\\hlpsys\参考答案\sjt3.vbp、sjt3.frm、sjt3.vbw
  请把这些文件复制到c:\wexam\中,然后打开sjt3.vbp文件并运行。
  (2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm, 在窗体上有一个命令按钮和一个文本框。程序运行后,单击命令按钮,即 可计算出 0~200范围内能被3整除的所有整数的和,并在文本框中显示出 来。在窗体的代码窗口中, 已给出了部分程序,其中计算能被3整除的整数的和的操作在通用过程Fun中实现,请编写该过程的代码。
  要求:
  请勿改动程序中的任何内容,只在Function Fun()和End Function之间填入你编写的若干语句。最后把修改后的文件按原文件名存盘。
  解题思路:
  启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt4.vbp,相应的窗体文件名为sjt4.frm。
  由于提供的Fun()函数不完整,需添加语句,具体内容:
  Function Fun()
  Sum = 0
  For i = 0 To 200
  If i Mod 3 = 0 Then
  Sum = Sum + i
  End If
  Next i
  Fun = Sum
  End Function
  参考文件:c:\wexam\\hlpsys\参考答案\sjt4.vbp、sjt4.frm、sjt4.vbw、outtxt.txt
  请把这些文件复制到c:\wexam\中,然后打开sjt4.vbp文件并运行。
  3. 综合应用(1小题,计30分)
  注意:下面出现的“考生文件夹”均为%USER%
  在考生文件夹下有一个工程文件sjt5.vbp,界面如图所示,其功能如下:
  1)单击“读数据”按钮,则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数,共计120个整数)读到数组a 中;
  2)单击“计算”按钮,则对每组数求平均值,并将所求各组数的平均值截尾取整后存入s 数组中;
  3)单击“显示”按钮,则将所求各组数的平均值显示在文本框Text1中;
  4)单击“存盘”按钮则把计算结果存盘。
  在给出的窗体文件中已经有了全部控件,且“读数据”、“显示”和“存盘”按钮的Click事件过程已经给出,请为“计算”按钮编写适当的事件过 程以实现上述功能。
  注意:
  不得修改已经存在的程序,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。
  解题思路:
  启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体文件名为sjt5.frm。
  由于所提供的窗体程序不完整,需添加事件过程。
  单击“计算”按钮(即运行Click事件过程),在该Click事件过程中加入语句:
  Private Sub Command2_Click()
  ’考生编写
  For i = 1 To 12
  Sum = a(i, 1)
  For j = 2 To 10
  Sum = Sum + a(i, j)
  Next j
  s(i) = Int(Sum / 10)
  Next i
  End Sub
  参考文件:c:\wexam\\hlpsys\参考答案\sjt5.vbp、sjt5.frm、sjt5.vbw、out5.dat
  请把这些文件复制到c:\wexam\中,然后打开sjt5.vbp文件并运行。
由于相关情况不断变化,本网站提供的信息仅供参考,请以官方机构发布为准!
转载资料请务必注明出处和原始作者。资料版权归原始作者所有。
如果本站所转载内容不慎侵犯了您的权益,请与我们联系,我们将会及时处理。
计算机等级考试热门信息
最近浏览过的信息
暂无最近浏览记录 上传我的文档
 下载
 收藏
该文档贡献者很忙,什么也没留下。
 下载此文档
正在努力加载中...
2013年3月上机题题库题干及答案解析(2)
下载积分:1000
内容提示:2013年3月上机题题库题干及答案解析(2)
文档格式:DOC|
浏览次数:56|
上传日期: 03:26:43|
文档星级:
该用户还上传了这些文档
2013年3月上机题题库题干及答案解析(2)
官方公共微信2013年3月全国计算机等级考试二级vb上机试题库完全版,vb上机题库及答案,二级vb上机..
扫扫二维码,随身浏览文档
手机或平板扫扫即可继续访问
2013年3月全国计算机等级考试二级vb上机试题库完全版
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由:
将文档分享至:
分享完整地址
文档地址:
粘贴到BBS或博客
flash地址:
支持嵌入FLASH地址的网站使用
html代码:
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布,请您等待!
3秒自动关闭窗口}

我要回帖

更多关于 数组逆序输出 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信