首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20 个0~1000的随机整数,放入一个数组中,然后输出这20 个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20 个0~1000的随机整数,放入一个数组中,然后输出这20 个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可
admin
2018-10-29
47
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20 个0~1000的随机整数,放入一个数组中,然后输出这20 个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可求出其平均值,并在窗体上显示出来(如图1-114所示)。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出0~200范围内能被3整除的所有整数的和,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算能被3整除的整数的和的操作在通用过程Fun 中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和 End Function 之间填入编写的若干语句。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?” 改为正确的内容。 参考代码: arrN(i) = Int(Rnd * 1000) Sum = 0 Sum = Sum + arrN(i) Aver = Sum /20 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4.vbp,在代码编辑窗口,编辑Fun函数的内容。 参考代码: Sum = 0 For i = 0 To 200 If i Mod 3 = 0 Then Sum = Sum + i End If Next i Fun = Sum 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/H3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) Fori=1Ton Dec=Dec*2+
如果要在窗体上使用2组单选按钮,每组都可以有一个被选中,则应该做的是( )。
假定在窗体上添加了一个通用对话框控件,其名称为CD1,并有如下程序段:CD1.ShowOpenCD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件,则FileTitle属性的值是
要使标签中的文本靠右显示,应将其Aligment属性设置为
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click() d=0 c=10 x=Array(10,12,21,32,24) Fori=
工程中有Form1、Form2两个窗体(Forml中有文本框Text1,Form2中有Text1文本框和command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateS
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
随机试题
公务员辞去公职的特点包括()
______suggestionsyoumake,hewillturnadeafeartothem.
急性淋巴细胞白血病引起的中枢神经系统白血病常发生的时间是()(2011年)
肱二头肌的主要作用是
重症肌无力累及眼外肌的比例为()
治疗肾病综合征,最能体现激素治疗有效的指标是
小儿哮喘发病的主要内因是
患者,男,50岁。咳嗽4年,痰带血、右胸痛2个月,吸烟30年,胸片左上肺可见一密度增高的圆形阴影,约5cm×3cm大小,边缘有毛刺样改变:如果此病人出现淋巴结肿大。下列哪组淋巴结可能先肿大
()是指以互联网为传播手段,通过对市场的循环营销传播,达到满足消费者需求和商家需求的过程。
1.在考生文件夹中,存有文档WT14.DOC,其内容如下:【文档开始】 中文Windows实验 中文文字处理Word实验 中文电子表格Excel实验 Internet网络基础实验【文档结束】 求完成下列操作:新建文档WD14.DO
最新回复
(
0
)