首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的列表框,且已有若干个项目,如图(a)所示。“部分反序”命令按钮的名称为Command1。程序运行时,单击“部分反序”按钮,列表框中除最前面的一个项目不动外,其他项目的顺序反向
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的列表框,且已有若干个项目,如图(a)所示。“部分反序”命令按钮的名称为Command1。程序运行时,单击“部分反序”按钮,列表框中除最前面的一个项目不动外,其他项目的顺序反向
admin
2018-06-29
65
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的列表框,且已有若干个项目,如图(a)所示。“部分反序”命令按钮的名称为Command1。程序运行时,单击“部分反序”按钮,列表框中除最前面的一个项目不动外,其他项目的顺序反向显示,如图(b)所示。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。其功能是:
1)单击“产生数据”按钮,产生10个随机整数,并显示在Picturel图片框的第1行;
2)在Text1文本框中输入要清0的第1个数的位置,在Text2文本框中输入要清0的个数,然后单击“清0”按钮,则把清0后的数据显示在图片框的下一行。如图所示。
其他约束:
a)若输入的第1个数位置大于10,则认为从第10个数开始;
b)若不输入第1个数位置,则认为从第1个数开始;
c)若不输入清0个数,则认为一直清0到最后一个数;
d)若输入的清0个数超出了最后1个数,则清0到最后一个数为止。
在窗体文件中已经给出了全部控件,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤l:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Private Sub Command1_Click() Dim k%,s$ For k=1 To f List1.ListCount—1) 2 s$=List1.List(k) List1.List(k)=List1.List(List1.List Count-k) List1.Listf List1.ListCount—k)=s Next End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Option Base 1 Dim a(10)As Integer Private Sub Command1_Click() Randomize For k=1 To 10 a(k)=Int(Rnd*99)+1 Picture1.Print a(k); Next k Picturel.Print End Sub Private Sub Command2_Click() Dim start As Integer,n As Integer start=Val(Text1.Text) If start=0 Then start=1 End If If start>10 Then start=10 End If If Text2.Text=""Then n=10一start+1 Else n=Val(Text2.Text) End If If start+n>11 Then n=10一start+1 End If For k=start To start +n-1 a(k)=0 Next k For k=1 To 10 Picturel.Print a(k); Next k End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)本题主要考察列表框控件属性的使用方法,根据题意可知,程序从列表框的第二项开始,将首尾项进行互换,所以循环变量k的初始值应该设置为1,循环体中的三条语句是将列表框的首尾对应项进行互换。
(2)单击Command1命令按钮时,随机产生10个整数放人数组a中,使用图片框控件的Print方法输出数组中的原始数据,单击Command2命令按钮时,使用If语句判断输入起始位置的值和清0的个数,变量start用来来保存起始位置,变量n用来保存清0的个数,再使用For循环根据起始位置清0n个数组元素值,并将结果输出。
转载请注明原文地址:https://kaotiyun.com/show/gdGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于二叉树的叙述中,正确的是()。
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项()。
(1)考生文件夹下的工程文件sjt3.vbp中有2个初始标题分别为“移动”和“退出”的命令按钮;1个初始状态为不可用的时钟Trimerl。请添加1个标签Labell,其标题为“计算机考试”,字体为黑体小四号字,左边界为500,且能根据显示的内容自动调整大小
下列数据结构中,能够按照“先进后出”原则存取数据的是()。
窗体上有一个名称为HScrolll的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是()。
窗体上有两个水平滚动条HV、HT,还有一个文本框Textl和一个标题为“计算”的命令按钮Commandl,并编写了以下程序:PrivateSubcommandl_Click()Callcale(HV.Value,HT.Value)End
数据库设计中反映用户对数据要求的模式是()。
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签|b|First中;同时计算矩阵主对角线的元素之和,计算结果显
在线性表的顺序存储结构中,其存储空间连续,各个元素所占的字节数
某二叉树的中序序列为DCBAEFG,后序序列为DCBGFEA,则该二叉树的深度(根结点在第1层)为
随机试题
“老师说我是好孩子”说明幼儿对自己的评价是()
一肺痨患者,男性,25岁,咳嗽、咯血、潮热颧红,自汗盗汗,面白神疲,气短声怯,食欲不振。舌尖红苔薄白,脉细数无力。应辨证为
外商投资企业和外国企业所得税的征税对象与范围包括( )。
假设商业银行A现持有一笔国债。研究部门预测市场利率在未来将上扬,国债价格有下跌的风险,银行A决定通过利率掉期来管理该笔国债的利率风险,并与交易对手B达成利率掉期协议,则A和B之间可以()。
当事人对省级人民政府的具体行政行为不服的,可以向国务院申请行政复议。( )
根据《继承法》关于法定继承的规定,下列()情况下,可以不均等分割遗产。
20世纪,水资源短缺尤其是水质性缺水成了世界共同面对的资源危机,污水处理顺理成章成为新兴朝阳产业。污水生物处理的实质就是通过微生物的新陈代谢活动,将污水中的有机物分解,从而达到净化污水的目的。人们希望通过污水处理改善水质,又希望采用低能耗、低资源消耗的技术
下面选项中的程序段,没有编译错误的是
要求主表中没有相关记录时就不能将记录添加到相关表中,则应该在表关系中设置
InBolivia,lifeisslowlyreturningtonormalafteralmostamonthofdemonstrations.【C1】______—frompoorpeasantfarmerstomi
最新回复
(
0
)