首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图1-110所示
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图1-110所示
admin
2018-10-29
49
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图1-110所示),即可求出其最大值,并在窗体上显示出来。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出1~1000范围内能被5整除或能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算能被5整除或能被7整除的整数的个数的操作在通用过程Fun 中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和 End Function 之间填入编写的若干语句。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: arrN(i) = Int(Rnd * 1000) Max = arrN(1) If arrN(i) >Max Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4.vbp,在代码编辑窗口,编辑Fun 函数的内容。 参考代码: For i = 1 To 1000 If i Mod 5 = 0 Or i Mod 7 = 0 Then Y = Y + 1 End If Next i Fun = Y 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/t3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimb(3,3)AsIntegerFori=1To3Forj=1To3
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0s=s&nMod
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) Fori=1Ton Dec=Dec*2+
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
以下能够触发文本框Change事件的操作是( )。
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() x=1 s=0 Fori=1To5 x=x/i s=s+x Next Print
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
有三个关系R、S和T如下:则关系T是由关系R和S通过某种操作得到,该操作为( )。
随机试题
我国商业银行在境内不得从事的投资包括()。
12岁男性患者,幼儿时曾左耳流脓,开口困难8年,无外伤史,无口腔面部炎症史。查:下面部不对称,开口2mm,左颞颌关节无动度,右侧颞颌关节活动明显。此患者颌畸形最可能的表现是
关于癔症,以下哪种说法是错误的
三棱的药用部位为
回收站中可以存放的内容包括()。
对于吸引人才,地方政府最应该做的,是营造一个适合人才流动、有利人才成长的环境与空间,而不是直接参与、甚至_________企业的人才录用过程。其实,自由、公平的竞争本身就是对人才最好的回报,足够的成长空间才是_________吸引人才、留住人才的沃土。
授权:就是上级布置给下属工作任务时,适当委授以一定的权力和责任,使其下属在一定的监督之下,有相当的行动自主权。下列不属于授权的一项是( )。
西突厥
分析中国传媒业“走出去”战略实施的绩效。(人大2012年研)
核心价值体系和核心价值观,是决定文化性质和方向的最深层次要素,是一个国家的重要稳定器。社会主义核心价值体系的基本内容包括
最新回复
(
0
)