首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3—109所示。要求如下: ①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。 ②请编写适当的
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3—109所示。要求如下: ①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。 ②请编写适当的
admin
2019-06-11
38
问题
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sjt3.frm,包含了所有控件和部分程序,如图3—109所示。要求如下:
①利用属性窗口向列表框添加四个项目:Visual Basic、Turbo C、C++、Java。
②请编写适当的程序完成以下功能:当选择列表框中的一项和单选按钮Option1,然后单击“确定”按钮,则文本框中显示“×××笔试”;当选择列表框中的一项和单选按钮Option2,然后单击“确定”按钮,则文本框中显示“×××上机”。其中“×××”是在列表框中所选择的项目。
注意:考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前,必须至少要进行一次选择操作(包括列表框和单选按钮),否则不得分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“计算并输出”。程序运行后,如果单击命令按钮,程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为1250的正整数,并在窗体上显示出来。这样的数有多组,程序输出每组开头和结尾的正整数,并用“~”连接起来,如图3—110所示。该程序不完整,请把它补充完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
第1小题 步骤1:打开考生文件夹下的工程文件sjt3.vbp,在窗体上选中列表框,为其List属性输入四个项目:Visual Basic、TurboC、C++、Java,注意每输入一项后用<Ctrl>+<Enters>键换到下一项输入。 步骤2:打开代码编辑窗口,编写“确定”按钮的单击事件过程。 参考代码: If Option1.Valoe And List1.Text<>" " Then Text1.Text=List1.Text& Option1.Caption Else If Option2.Value And List1.Text<>" "Then Text1.Text=List1.Text&Option2.Captio n End If End If 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,在列表框中选择一项,并选中一个单选按钮,单击“确定”按钮。单击窗体右上角的关闭按钮结束程序。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: iSum=0 iSum=iSum+j If iSum=1250Then 步骤2:按要求将文件保存至考尘文件夹中。
解析
第1小题:本题根据是选择“笔试”或“上机”分为两种情况,若选择“笔试”则在文本框中显示列表框的Text属性值与单选按钮Option1的Caption属性值的组合内容;若选择“上机”则在文本框中显示列表框的Text属性值与单选按钮Option2的Caption属性值的组合内容。
第2小题:程序设计思路:按顺序让1~500中的每一个数都与它之后的所有的数逐一相加,在相加过程中若累加和等丁或超过1250时,则停止该组数继续相加,并将和等于1250的该组数的开头和结尾的数按题目要求输出。源程序使用嵌套For循环完成上述功能,变量iSum用于记录每组数累加时的和,其初值应为0;表达式iSum=iSum+i用于实现累加功能;当累加和正好等于1250时,输出该组数的开头和结尾的数,即i和j。
转载请注明原文地址:https://kaotiyun.com/show/J8Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为“零点”)。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返回fix)
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfune(LAsLabe1)PrivateSubCommand1_Click()L.Caption="1234
以下叙述中错误的是
输入VB源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
有数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行语句后,不是整型变量的是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
在窗体上画一个命令按钮,然后编写如下程序:Subinc(aAsInteger)PrivateSubCommand1_Click()StaticxAsIntegerinc2:inc3:inc4x=x+aPrintx;E
下面的程序执行完毕后,组合框中数据项的值是()。PrivateSubFoma_Click()Fori=1To6Combo1.AddltemiNextiFori=lTo3
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
随机试题
患者男,45岁,以“因回吸鼻涕带血3个月,右耳听力下降10天”就诊。患者3个月前开始出现回吸鼻涕带血,多为陈旧性血液,无鼻塞、头痛、咳痰等表现,未诊治。近10天出现右耳听力减退、伴耳鸣,元眩晕、耳痛、耳流脓等。临床检查见:右侧耳道通畅,右鼓膜完整、内陷,鼓
男性,12岁,突发意识障碍2小时。查体:呼吸慢,血压增高,右侧瞳孔散大,双侧对光反射消失。头颅CT示右侧颞叶血肿。最可能的诊断为
《审计法》规定,国务院和县级以上地方人民政府应当每年向本级人民代表大会常务委员会提出审计机关对预算执行和其他财政收支的审计工作报告。审计工作报告应当重点报告:
下列事项不属于行政许可法调整的是:()
当战争开始后,国际实践中处理交战国间及交战国与非交战国间的条约关系一般有哪些做法?()
在所有计算中,常数e、π和因子等数值的有效位数,可认为无限制,需要几位就取几位。()
课程结构
某公司有一栋6层的办公楼,公司的财务部、企划部、行政部、销售部、人力资源部、研发部6个部门在此办公,每个部门占据其中的一层。已知:(1)人力资源部、销售部2个部门所在的楼层不相邻;(2)财务部在企划部下1层;(3)行政部所在的
建立表示学生选修课程活动的实体联系模型,其中的两个实体分别是()。
その件は ながら、話しましょう。
最新回复
(
0
)