首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为 Form1的窗体上画三个命令按钮,其名称分别为 C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-125所示)。程序运行后,如果单击“读入数据
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为 Form1的窗体上画三个命令按钮,其名称分别为 C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-125所示)。程序运行后,如果单击“读入数据
admin
2018-10-29
60
问题
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为 Form1的窗体上画三个命令按钮,其名称分别为 C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-125所示)。程序运行后,如果单击“读入数据”按钮,则调用题目已提供的ReadData1和ReadData2过程读入datain1.txt和datain2.txt 文件中的各20个整数,分别放入Arr1和 Arr2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素除以10并截尾取整后相乘,其结果放入第三个数组中(即把第一个数组的第n个元素除以10截尾取整,再把第二个数组的第n 个元素除以10截尾取整,两者相乘后的结果作为第三个数组的第n 个元素。这里的n 为 1,2,…,20),最后计算第三个数组各元素之和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则调用题目中给出的WriteData 过程将所求得的和存入考生文件夹的dataout.txt 文件中。
注意:考生不得修改窗体文件中已经存在的程序,必须把求得的结果单击“存盘”按钮存入考生文件夹下的dataout.txt 文件中,否则没有成绩。最后把修改后的文件以原来的文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画两个文本框,其名称分别为Text1、Text2,文本框的内容分别设置为“计算机”、“等级考试”。然后画一个标签,其名称为Lab1,高度为375,宽度
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件在窗体中如表2-46画出控件,并设置其属性。 [*] 步骤2:在代码编辑窗口编写以下事件过程。 参考代码: Dim Sum As Integer Private Sub C1_Click() ReadData1 ReadData2 End Sub Private Sub C2_Click() Dim Arr3(20) As Integer Sum = 0 For i = 1 To 20 Arr3(i) = Int(Arr1(i) / 10) * Int(Arr2(i) / 10) Sum = Sum + Arr3(i) Next i Print "Sum = "; Sum End Sub Private Sub C3_Click() WriteData "Dataout.txt", Sum End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击“读入数据”按钮,然后单击“计算”按钮,最后单击“存盘”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/uCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下不能触发滚动条Change事件的操作是( )。
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是( )。
以下关于控件数组的叙述中,正确的是( )。
某人编写了下面的程序:PrivateSubCommand1_Click() DimaAsInteger,bAsInteger a=InputBox("请输入整数") b=InputBox("请输入整数") pro
设有如下通用过程:PublicFunctionf(xAsInteger) DimyAsInteger x=20 y=2 f=x*yEndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下
以下不属于单选按钮的属性是( )。
下列打开"代码窗口"的操作中错误的是( )。
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
随机试题
甲曾是某高校旅游专业的大学生,毕业后向当地工商行政管理机关申请设立专门提供旅游咨询服务的个人独资企业。要求:(1)甲在申请设立企业的申请书中未载明注册资金的数额,判断该申请书的效力。并判断工商行政管理机关是否受理其申请。(2)甲向该企业投资的5台电脑、
口底及颌下的急性蜂窝织炎危及生命的并发症是【】
女性,40岁,反复发作“尿路感染”6年余,近一年来夜尿增多。尿白细胞10~15/HP,血尿素氮12mmol/L,B超右肾9.2cm×4cm×3cm,左肾8cm×3cm×2cm,左肾集合系统回声分离1.2cm,肾实质2cm,中段尿培养大肠埃希菌生长。本例
神志不清,语言重复,声音低微,时断时续,称为
取一期愈合的是()。
大蓟的功效是()地榆的功效是()
警察是具有( )性质的维护社会秩序、保卫国家安全的国家行政力量。
成仿吾是我国无产阶级革命家,马克思主义理论家、教育家,他是由“文化人”成为“革命人”的典型之一,成仿吾究竞是个什么样的人呢?作家丁玲在未跟他谋面之前,曾产生过一系列的“合理想象”:“在文学上,他主张浪漫主义,创造社最早就是这样主张的:他是从日本留学回来的,
TheImpossibilityofRapidEnergyTransitions[A]Politiciansarefondofpromisingrapidenergytransitions.Whetheritisatra
Somepeople’searsproducewaxlikebusylittlebees.Thiscanbeaproblemeventhoughearwax(耳垢)appearsto【S1】______animporta
最新回复
(
0
)