首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a 中; ②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a 中; ②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整
admin
2018-10-29
68
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:
①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的100个正整数读入数组a 中;
②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它就是完全平方数。例如,36=62,所以36就是一个完全平方数),并将这些完全平方数的最大值与个数分别显示在文本框Text1、Text2中。
在给出的窗体文件中有了全部控件(如图1-76所示),但程序不完整,请将程序中的注释符去掉,把?号改为正确的内容,实现上述功能。
注意:考生不得修改窗体文件已存在的控件和程 序,最后将程序原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有两个标题分别为“添加”和“退出”的命令按钮,一个内容为空的列表框List1。请画一个标签,其名称为Label1,标题为“请输入编号”;再画一个名称为Text1,初始值为空的文本框,如图1-77所示。程序功能如下:
①系统启动时,自动向列表框添加一个编号信息“a0001”。
②系统运行时,在文本框Text1 中输入一个编号,并单击“添加”按钮时,如果该编号与已存在于列表框中的其他编号不重复,则将其添加到列表框List1已有项目之后;否则,将弹出“不允许重复输入,请重新输入!”对话框,单击该对话框中的“确定”按钮,可以重新输入。
③单击“退出”按钮,则结束程序运行。
要求:请去掉程序中的注释符,把程序中的?改 为正确的内容,使其实现上述功能,但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt3.vbp,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If x = m ^ 2 Then is_square = flag If a(k) > max Then Text1.Text = max Text2.Text = num 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件如表2-19在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: List1.AddItem "a0001" For i = 0 To List1.ListCount - 1 List1.ListIndex = i List1.AddItem Text1.Text End 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/gCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若窗体上有一个名为Command1的命令按钮,并有下面的程序:PrivateSubCommand1_Click() Dimarr(5)AsInteger Fork=1To5 arr(k)=k Nextk prog
在数据管理技术发展的三个阶段中,数据共享最好的是( )。
现有如下一段程序:PrivateSubCommand1_Click() x=UCase(InputBox("输入:")) SelectCasex Case"A"To"C" Print"考核通过!"
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer() StaticflagA
对于列表框控件List1,能够表示当前被选中列表项内容的是( )。
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是( )。
下列打开"代码窗口"的操作中错误的是( )。
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:PrivateSubCommand1_Click()DimxAsString,sAsString,tempAsString
随机试题
某公司向银行借款500万元,将10间厂房抵押给银行。银行对该10间房的抵押权是()。
设备运杂费通常由()构成。
仰韶文化的制陶业较为发达,以“彩陶文化”而异于其他文化遗存。()
(1)我们要耐心教育孩子,不要______他们的自尊心。(2)时至今日,语言文字______仍然存在混乱现象。(3)我仿佛窥见鲁迅先生丰富的精神世界,感受到他所具有的道德力量,相比之下,越发显出我自己的______。填入画横线部分最恰当的一项是:
我国历史上推行“罢黜百家,独尊儒术”的皇帝是()。
已知方程组(Ⅱ)x1+5x3=0,那么(I)与(Ⅱ)的公共解是___________.
围绕山顶一圈有N个山洞,编号为0、1、2、3、……、N—1,有一只狐狸和一只兔子在洞中居住。狐狸总想找到兔子并吃掉它,它的寻找方法是先到第一个洞(即编号为0的洞)中找;再隔1个洞,即到编号为2的个洞中找;再隔2个洞,即到编号为5的洞中找;下次再隔3个洞;即
下列数据结构中不属于线性存储结构的是()。
ThefirstfarmanimalJackever【51】fromastockyardwasalamb【52】Hilda.aamSanctuary,180acresofveganheavenintheFinger
LimitingtheBuyingofCarsorNot?1.对于北京限制购车,有人赞成2.也有人表示反对3.你的看法
最新回复
(
0
)