首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这
admin
2016-03-22
69
问题
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这些数的平均值(平均值保留2位小数,是否四舍五入不限),并将它们(共10个值)分别显示在Labell数组及Text2数组中。单击“保存”按钮,则保存计算结果。“显示数据”和“保存”按钮的Click事件过程已经给出,请编写“统计”按钮的Click事件过程实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须用“统计”进行统计,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,打开代码编辑窗口,在指定位置编写以下代码: 参考代码: For i=1 To 5 Sum=0 Counter=0 For j=1 To 4 0 If a(i,j)<50 Then Sum=Sum+a(i,j) Counter=Counter+1 End If Next Avg=Sum/Counter Labell(i一1).Caption=Sum Text2(i一1).Text=Int(Avg*i00)/100 Next 步骤2:按
键运行程序,先单击“显示数据”按钮,接着单击“统计”按钮,然后单击“保存”按钮保存结果。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/KMLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在VB中,过程共有三种,它们是()。
有如下SUB过程:Subs(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗体上添加一个命令按钮,然后编写如下事件过程:PrivateSubF
以下程序的功能是:先将随机产生的10个不同的整数放人数组a中,再将这10个数按升序方式输出。请填空。PrivateSubFormClick()Dima(10)AsInteger,iASIntegerRandomi
设窗体上有_个名为Listl的列表框,并编写下面的事件过程:PrivateSubListl_Click()DimchAsStringch=Listl.List(Listl.Listlndex)Listl,R
窗体上有一个名为Commandl的命令按钮,并有如下程序:PrivateSubCommandl_Click()Dima(10),x%a(k)=Int(Rnd*90+10)x=x+a(k)Mod2P
阅读程序:PrivateSubCommandl一Click()DimarrDimiASIntegerarr=Array(0,1,2,3,4,5,6,7,8,9,10)Fori=0To2
有人编写了如下程序:PrivateSubForm_Click()DimsAsInteger,xAsIntegers=0x=0DoWhiles=10000x=x+1
设已经在窗体上添加了一个通用对话框控件CommonDialog1,以下正确的语句是
在窗体模块的通用声明段中声明变量时,不能使用()关键字。
程序测试分为静态分析和动态测试。其中______是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
随机试题
甲公司是一家餐饮上市公司,企业的目标是为股东创造更多价值。在下列情形中,反映企业创造价值的是()。
关于气管内插管,下列哪项是不正确的?
生物转化反应分为两相反应,下列哪项不属于第一相反应
下列关于肺泡表面活性物质的叙述,错误的是
下列表述中属于适用移送管辖必须具备的条件的是:()。
设A为m×n矩阵,则齐次方程组Ax=0仅有零解的充分条件是()。
地基验槽时,需在基底进行轻型动力触探的部位有( )。
某公司因业务需要,经营地点从吴忠迁至银川。该公司需要办理()税务登记。
A、 B、 C、 D、 B部分数依次为1、2、3、4、(5),答案为B。
Rayburn制造公司目前是一家完全权益结构的公司,公司的权益价值是2000000美元,权益的成本为18%,并假定不存在税收。该公司计划发行400000美元的债务用于回购公司股票,债务成本是10%。请计算:回购后公司总的资本成本:
最新回复
(
0
)