首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作: 在名称为Form1的窗体上画两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图1-129所示)。程序运行后,如果单击“读入数据”按钮,则
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作: 在名称为Form1的窗体上画两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图1-129所示)。程序运行后,如果单击“读入数据”按钮,则
admin
2018-10-29
27
问题
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:
在名称为Form1的窗体上画两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图1-129所示)。程序运行后,如果单击“读入数据”按钮,则调用题目所提供的ReadData1和ReadData2过程读入datain1.txt 和datain2.txt文件中的各20个整数,分别放入Arr1和 Arr2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素相减,其结果放入第三个数组中(即第一个数组的第n个元素减去第二个数组的第n个元素,其结果作为第三个数组的第n个元素。这里的n 为 1,2,…,20),最后计算第三个数组各元素之和,把所求得的和在窗体上显示出来;并调用题目中给出的WriteData 过程将所求得的和存入考生文件夹下的DataOut.txt 文件中。
注意:考生不得修改窗体文件中已经存在的程序,且必须执行此程序一次,最后把修改后的文件以原来的sjt3.vbp,文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在窗体中如表2-49画出控件,并设置其属性。 [*] 步骤2:在代码编辑窗口编写以下事件过程。 参考代码: Dim Sum As Integer Private Sub C1_Click() ReadData1 ReadData2 End Sub Private Sub C2_Click() Dim Arr3(20) As Integer Dim Sum As Integer sjt4.vbp, Sum = 0 For i = 1 To 20 Arr3(i) = Arr1(i) - Arr2(i) Sum = Sum + Arr3(i) Next i Print "Sum = "; Sum WriteData "dataout.txt", Sum End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击“读入数据”按钮,然后单击“计算”按钮。
解析
转载请注明原文地址:https://jikaoti.com/ti/VDm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
产生100以内(不含100)2位随机整数的VisualBasic表达式是
为了将"联想电脑"作为数据项添加到列表框List1的最前面,可以使用语句()。
在利用菜单编辑器设计菜单时,为了把组合键"Alt+X"设置为"退出(X)"菜单项的访问键,可以将该菜单项的标题设置为( )。
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
支持子程序调用的数据结构是( )。
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
如果要将一个窗体从内存中清除,应使用的语句是
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是( )。
随机试题
废热锅炉发生逆循环时对生产没有影响。
男性,62岁。右下肺鳞癌已顺利经过手术,淋巴结无转移。患者及其家属极为关心其预后。下列哪条不是判定预后的主要因素
女性,38岁,肛门口不适伴有分泌物半年余。平日常有低热,3年前患肺结核,经抗结核治疗好转。近l周来肛周疼痛加剧不能平坐而来就诊。体格检查:体温38.8℃,肛门口有明显红、肿、压痛、肿块,穿刺有脓液。如为结核性肛瘘,下一步处理应该是
某工程项目,业主通过招标与甲建筑公司签订了土建工程施工合同,包括A、B、C、D、E、F、G、H八项工作,合同工期360天。业主与乙安装公司签订了设备安装施工合同,包括设备安装与调试工作,合同工期180天。通过相互协调,编制了如图4-1所示的网络进度计划。
用人单位可以解除劳动合同的情形是()。
()是指保证人和债权人约定,当债务人不履行债务时,保证人按照约定履行债务或者承担责任的行为。
境内某家电生产企业2017年度境内所得应纳税所得额为500万元,在全年已预缴税款100万元,来源于境外A国税前所得200万元,境外实纳税款40万元,该企业当年汇算清缴应补退的税款为()万元。
A.onB.propertyC.runPhrases:A.allotherformsoftobacco【T7】______schoolgroundsB.ifthey’reonschool【T8】______C.sm
在过程定义中有语句:PrivateSubGetData(ByValdataAsInteger)其中"ByVal"的含义是( )。
【B1】【B7】
最新回复
(
0
)