首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为125
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为125
admin
2016-01-31
68
问题
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为1250的正整数,并在窗体上显示出来。这样的数有多组,程序输出每组开头和结尾的正整数,并用“~”连接起来,如图3-91所示。该程序不完整,请把它补充完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
审题分析 程序设计思路:按顺序让1~500中的每一个数都与它之后的所有的数逐一相加,在相加过程中若累加和等于或超过1250时,则停止该组数继续相加,并将和等于1250的该组数的开头和结尾的数按题目要求输出。源程序使用嵌套For循环完成上述功能,变量iSum用于记录每组数累加时的和,其初值应为0;表达式iSum=iSum+i用于实现累加功能;当累加和正好等于1250时,输出该组数的开头和结尾的数,即i和i。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: iSum=0 isum=iSum+j If iSum=1250 Then 步骤2:按要求将文件保存至考生文件夹中。 考点链接 多重循环。
解析
转载请注明原文地址:https://kaotiyun.com/show/6rLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在长度为64的有序线性表中进行顺序查找,最坏情况下需要比较的次数为()。
当滚动条位于最左端或最上端时,Value属性被设置为()。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为12,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsIntegerSinxAsSin
下列子过程语句中正确的是()。
窗体上有名称为Text1、Text2的两个文本框,和一个由3个单选按钮构成的控件数组Option1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图2
数据结构中,与所使用的计算机无关的是数据的______。
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项"大图标",则在该菜单项前添加一个"√"。以下正确的事件过程是
窗体上已有名称分别为Drivel、Dirl、Filel的驱动器列表框、目录列表框和文件列表框,且有1个名称为Textl的文本框。以下程序的功能是:将指定位置中扩展名为“.txt”的文件显示在Filel中,如果双击FileI中的某个文件,则在Textl中显示
栈通常采用的两种存储结构是
逻辑常量值为True或______。
随机试题
某企业在同一生产线上既可以生产A产品,也可以生产B产品,但根据生产能力只能生产其中一种产品。A、B产品的预计产销量分别是300件和150件,预计销售价格:分别是12元和30元,单位变动成本分别是6元和24元。 要求:根据以上资料,进行生产哪种产品有
AssoonasWorldWarIIended,Einsteinurgedthatatomicenergy______topeacefuluse.
缺乏下列哪种维生素可产生巨幼红细胞贫血
阳和汤的组成药物不包括
光驱的倍数越大()。
阅读下面高中课堂教学导入片段,回答问题。某地理教师在讲述“热力环流”时,这样导入新课:“同学们,地球周围的大气好像一部巨大的机器,日夜不停地运动着。它的运动形式多种多样,范围也有大有小,正是这种不停的大气运动,形成了地球上今天不同地区的天气和气候。大气
被辞退人员在接到《辞退国家公务员通知书》或者接到维持原辞退决定的《国公务员复核(申诉)决定通知书》的( )日内办理公务交接手续和辞退手续。
运行下面程序后,正确的输出结果是______。PrivateSubCommand1_Click()x=6ifx>6thenPrint"x>6":Elseifx<8then
WhatkindofweatherisnormalforMarch?
STOPSMOKINGDoyouwanttostopsmoking?Haveyoualreadytriedtostopbutfailed?Nowit’stimetostopsmokingusingthe
最新回复
(
0
)