首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件vbsi3.vbp,相应的窗体义件为vbsj3.frm,在窗体上有一个标题为“计算”的命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出数组arr中每个元素与其下标相除所得的和,并在文本框中显示出来,程序的运行情况
(1)在考生文件夹下有一个工程文件vbsi3.vbp,相应的窗体义件为vbsj3.frm,在窗体上有一个标题为“计算”的命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出数组arr中每个元素与其下标相除所得的和,并在文本框中显示出来,程序的运行情况
admin
2016-12-29
44
问题
(1)在考生文件夹下有一个工程文件vbsi3.vbp,相应的窗体义件为vbsj3.frm,在窗体上有一个标题为“计算”的命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出数组arr中每个元素与其下标相除所得的和,并在文本框中显示出来,程序的运行情况如图2.55所示。在窗体的代码窗口中,已给出了部分程序,其中计算数组arr中每个元素与其下标干目除所得的和的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的其他部分,只在Function Fun()和End Function之间填入你编写的若干语句并运行程序。在结束程序运行之前,必须至少正确运行一次程序,将结果显示在文本框中,否则无成绩。最后把修改后的文件按原文件名存盘。
说明:数组arr中共有40个元素,“数组arr中每个元素与其下标相除所得的和”,是指:arr(1)/1+arr(2)/2+arr(3)/3+…+arr(40)/40
(2)在考生文件夹下有一个工程文件vbsj4.vbp。程序运行后,如果单击“开始”按钮,则图片自左向右移动,同时滚动条的滑块随之移动,每0.5秒移动一次。当图片完伞移出窗体的右边界时,立即再从窗体的左边界开始重新移动,荇单击“停止”按钮.则图片停止移动,如图2.56所示。在窗体义件中已经给出了全部控件,但程序不完整
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件vbsj3.vbp。 步骤2:进入代码编辑窗口,在Function Fun()和End Function之间输入以下代码: 参考代码: Function Fun(a()As Single)As Single Dim slim As Single Dim i As Integer For i=LBound(a)To UBound(a) sum=sum+a(i)/i Next Fun=sum End Function 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的工程义件vbsj4.vbp。 步骤2:进入代码编辑窗口,去掉柙序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: Trnrl.Enabled=False Tmrl.rnterval=500 If Picl.r,eft>Me.Width Then Picl.Left=0 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/g9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮,其单击事件过程代码如下:PrivateSubCommandlClick()StaticxAsVariantn=0x=Array(1,2,3,4,5,6,7,8
下面不属于软件设计阶段任务的是()。
下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。PIivateSubCommandlClick()X=
在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(见图)。下面能实现此功能的事件过程是()。
下列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。PrivateSubForm_Click()DimiAsIntegerOpen【】As#1Fori=1To10
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填()。SubEnSure()DimyearAsIntegeryear=Val(InputBox("请输入年份:"))
VisualBasic中的工程文件的扩展名是______。
以下语句可以实现将文件filename1复制为filename2的是______。
随机试题
采血后制备出来的相应血液成分,以下哪种疾病需要相应的血液成分A.红细胞悬液B.新鲜冰冻血浆C.普通冰冻血浆D.冷沉淀E.浓缩血小板一个妇女,经常性月经量过多,皮肤有出血点,检查显示血小板数量1.5×109/L,此时应选择何种成分输注
固体制剂质量标准中[检查]项下,均匀度和溶出度(释放度)检验的作用是:
患者男性,27岁,气急,乏力,心绞痛,活动后晕厥,听诊胸骨左缘可闻及收缩中晚期粗糙的吹风样杂音,临床诊断为肥厚型梗阻性心肌病。根据左室流出道有无狭窄,肥厚型心肌病分为
流行性乙型脑炎不具有的改变是
中国古代建筑主要以木结构形式为主,包括()几种形式。
以下属于期货投资咨询业务的是()。
收益递增理财计划属于()
下列属于政策性金融机构特有职能的是()。
欧洲共同体(北京师范大学2006年世界通史真题)
“查询”设计视图窗口分为上下两部分,其中上半部分分为()区。
最新回复
(
0
)