首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【 】和【 】、【 】处填入适当的内容,将程序补充完整。 Pri
在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【 】和【 】、【 】处填入适当的内容,将程序补充完整。 Pri
admin
2009-02-13
51
问题
在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【 】和【 】、【 】处填入适当的内容,将程序补充完整。
Private Sub Command1_Click( )
Dim a(100)
For j=1 To 100
a(j)=Int (【 】)
If a(j)【 】5=0 Then【 】
Print a(j)
Next j
Print
print k/100
End Sub
选项
答案
(999*Rnd)+1 , Mod , k=k+1
解析
If语句判断数组中5的倍数,故[13]填:Mod,表示取模。
由于要计算出5的倍数所占的比例,故每判断出一个5的倍数,便令一个变量加1,观察Print k/100可以得出该变量为k。故[14]填:k=k+1。
转载请注明原文地址:https://kaotiyun.com/show/z72p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。
下列程序的输出结果是 publicclassfff{ voidprintValue(intm){ do{System.out.println("Thevalueis"+m); } whil
在下列程序的划线处应填入的语句是 classPemon{ pnvateinta; } publicclassManextendsPerson{ publicintb; publicstaticvoidmain(St
下面的程序是用do-while语句计算10的阶乘。请在程序的每条横线处填写1个语句,使程序的功能完整。注意:请勿改动main()主方法和其他已有的语句内容;仅在横线处填入适当的语句。源程序文件代码清单如下:publicclass
Java运行时系统通过【】周期性地释放无用对象所使用的内存,以完成对象的消除。
下面哪个不是InputStream类中的方法?
下列语句序列执行后,i的值是()。inti=10;do{i-=2;}while(i>6);
设有下列两个类的定义,则类Person和类Man的关系是()。classPerson{longid://身份证号Stfingname;//姓名}classManextendsPerson{i
下列程序的功能是在监控台上每隔一秒钟显示一个字符串“你好!”,能够填写在程序中画线位置,使程序完整井能正确运行的语句是publicclassExamimplementsRunnable{publicstaticvoid
Java窗体设计程序运行时,在命令下用______键可以终止程序的运行。()
随机试题
正常分娩胎膜破裂的时间一般是()。
下列有关个人独资房地产经纪机构承担机构债务的说法,正确的是()。
穿过软土层把建筑荷载传递给较硬的持力层的桩称为()。
金融机构的准备金存款按季结息,每季度末月的20日为结息日,按()的利率计息。
期刊变更()等,应该依照有关创办期刊的规定办理审批、登记手续。
《莎乐美》是英国唯美主义作家奥斯卡-王尔德于1893年创作的戏剧,莎乐美的故事最早记载于《圣经-新约》中的《马太福音》,是以下哪位音乐家把这个故事改编成了家喻户晓的同名歌剧?()
【B1】【B12】
PASSAGEONEWhydidthegirlplaybasketballoverandoveragain?WhatisthenurseryroomlikeaccordingtoPara.3?
A、Tallenoughforthemtobuildnests.B、Shortsothatbirdscanfind.C、Itdoesn’tmattersinceallbirdslikeboth.D、Itdepen
Dinkum’sinformedtheirworkforcelastweekthatinadesperateattempttosavejobs,theywouldmoveovertoajob-sharesystem
最新回复
(
0
)