首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3.109所示。要求如下: ①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3.109所示。要求如下: ①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。
admin
2017-09-22
62
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3.109所示。要求如下:
①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。
②请编写适当的程序完成以下功能:当选择列表框中的一项和单选按钮Optionl,然后单击“确定"按钮,则文本框中显示“×××笔试”;当选择列表框中的一项和单选按钮Option2,然后单击“确定”按钮,则文本框中显示“×××上机”。其中“×××”是在列表框中所选择的项目。
注意:考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前,必须至少要进行一次选择操作(包括列表框和单选按钮),否则不得分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为1250的正整数,并在窗体上显示出来。这样的数有多组,程序输出每组开头和结尾的正整数,并用“~”连接起来,如图3.110所示。该程序不完整,请把它补充完整。
要求:去掉程序中的注释符,把程序中的“?"改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
(1)步骤1:打开考生文件夹下的工程文件sjt3.vbp,在窗体上选中列表框,为其List属性输入四个项目:Visual Basic、Turbo C、C++、Java,注意每输入一项后用
+
键换到下一项输入。 步骤2:打开代码编辑窗口,编写“确定”按钮的单击事件过程。参考代码: If Optionl.Vatlue And List1.Text<>"" Then Text1.Text=List1.Text & Optionl.Caption Else If Option2.Value And List1.Text<>""Then Text1.Text=List1.Text & OptiOn2.Captio n End If End If 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按
键运行程序,在列表框中选择一项,并选中一个单选按钮,单击“确定”按钮,单击窗体右上角的关闭按钮结束程序。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: iSum=0 isum=iSum+j If isum=1250 Then 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)本题根据是选择“笔试”或“上机”分为两种情况,若选择“笔试”则在文本框中显示列表框的Text属性值与单选按钮Optionl的Caption属性值的组合内容;若选择“上机”则在文本框中显示列表框的Text属性值与单选按钮Option2的Caption属性值的组合内容。
(2)程序设计思路:按顺序让1~500中的每一个数都与它之后的所有的数逐一相加,在相加过程中若累加和等于或超过1250时,则停止该组数继续相加,并将和等于1250的该组数的开头和结尾的数按题目要求输出。源程序使用嵌套For循环完成上述功能,变量iSum用于记录每组数累加时的和,其初值应为0;表达式iSum=iSum+j用于实现累加功能;当累加和正好等于1250时,输出该组数的开头和结尾的数,即i和j。
转载请注明原文地址:https://kaotiyun.com/show/GjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimerl_______TextTime.text=TimeEndSu
在窗体上画一个名称为Text1的文体框,然后画一个名称为HScrolll的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示。以下能实现上述操作的程序段是
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsIntegerClsPri
数据库系统的三级模式分别为【】模式、内部级模式与外部级模式。
随机文件使用Put语句写数据,使用【】语句读数据。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
有如下事件过程: SubABD(x%,y%,z%) z%=X%+y% EndSub PrivateSubCommand1_Click() a%=30:b%=40 CallABD(a%,b%,c%) Pr
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
要把一个命令按钮设置成无效,应设置属性______的值为False。
随机试题
Withatremendousroarfromitsrocketengine,thesatelliteissentupintothesky.Minuteslater,atanaltitudeof300miles
导致动脉炎症性脑血栓的常见病原体是()
气相色谱具有诸多优势,恰当的说法是
下列产品中,不属于《产品质量法》调整对象的有()。(2011年多项选择第68题)
甲股份有限公司(以下简称“甲公司”)20×4年为实现产业整合,减少同业竞争实施了一项企业合并,与该项企业合并及合并后相关的交易事项如下: (1)3月20日,甲公司与其控股股东(P公司)及独立第三方S公司分别签订股权购买协议,从P公司购买其持有的乙公司6
下列对于古代称谓说法错误的是()。
在月经周期中,形成雌激素分泌第二个高峰的直接原因是()。
甲委托乙卖掉乡下老宅院子里桂花树中的一棵。乙找到从事收购的丙,丙认为一棵树太少,至少两棵才愿意做这单生意。乙给甲打电话,但恰巧不通,丙对乙说:“都已经委托你了还不能拿主意?”于是乙卖给丙两棵桂花树。下列说法正确的是()。
《中华人民共和国行政处罚法》在“行政处罚的管辖和适用”一章中规定,三种情形下不予行政处罚,其中不包括()。
下列机构中,属于国务院直属特设机构的是()。
最新回复
(
0
)