首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生40个0~800的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击名称为Commandl的命令按钮,标题为“输出最小值”,即可求出其最小值,并在T
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生40个0~800的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击名称为Commandl的命令按钮,标题为“输出最小值”,即可求出其最小值,并在T
admin
2009-03-26
58
问题
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生40个0~800的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击名称为Commandl的命令按钮,标题为“输出最小值”,即可求出其最小值,并在Textl文本框中显示出来,如图33—4所示。这个程序不完整,请把它补充完整,并能正确运行。
注意:去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp,相应的窗体文件为sj4.frm,在窗体上有一个命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出100~800范围内能被3整除和能被5整除的整数的个数,并在文本框中显示出来,如图33—5所示。在窗体的代码窗口中,已给出了部分程序。
注意:请勿改动程序中的其他任何内容,只将“?”处的代码编写完整。最后把修改后的文件按原文件名存盘。
选项
答案
(1)在数组求最小值中,定义一个变量,用来存放数组中的最小值,在数组比较开始前,对变量进行赋初始值。在比较中,使用循环让变量和数组中的每个元素进行逐个比较,每次比较后变量中保存两个数中最小的数,循环结束后,变量中存放的数即为最小值。 由于要产生随机数,所以要调用Rnd()函数,Rnd函数返回小于1,但大于或等于0的值,其语法格式为:Rnd[(number)]。number参数是可选的,是Single或任何有效的数值表达式。number的值决定了Rnd函数生成随机数的方式。为了生成某个范围内的随机整数,可使用公式:Int((upperbound-lowerbound+1)*Rnd+lowerbound)。这里,upperbound是随机数范围的上限,而lowerbound则是随机数范围的下限。具体代码如下: Private Sub Commandl_Click() Dim a(40)As Long Dim i As Integer Dim tmp As Integer For i=1 To 40 a(i)=
Rnd()
*(800—0) ’产生0~800的随机数,放人数组中 Next i tmp=a(1) For i=2 To 40 If tmp>
a(i)
Then tmp=a(i) ’获得最小值 End If Next i Textl.Text=tmp’在Textl中显示最小值 End Sub 单击[*]按钮运行程序,并按要求保存。 (2)本题使用Mod运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能整除。具体代码如下: Private Sub Commandl_Click() Dim i As Integer Dim num As Integer num=0 For i=100 To 800’for循环从100到800 If i
Mod
3=0 And i
Mod
5=0 Then num=num+1 ’如果能同时被3和5整除,计数加1 End If Next i Textl.Text=num’在Textl中输出个数 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/9N1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在一个类的内部嵌套定义的类称为【】。
结构化程序设计所规定的3种基本控制结构是循环结构、选择结构和【】。
结构化程序设计主要强调的是()。
在面向对象的程序设计中,下列叙述中错误的是
关于J2SDK的基本命令,下列叙述正确的是______。
Java语言对内存采用【】机制,有效地防止了因程序员误操作而引起的错误,并更好地利用了系统资源。
对鼠标点击按钮操作进行事件处理的接口是()。
若有以下定义inta[]={1,2,3,4,5,6,7};charc1=’b’,c2=’2’;则数值不为2的表达式是()。
文件操作中,语句publicStringgetPath()的作用是()。
随机试题
发行时不规定利率,券面也不附息票的债券是()。
对于人类传播史来说,第一个重要的里程碑是()
甘寒养胃阴方药中加入咸寒滋养肾阴的药物,目的是
汉译英:“黄曲霉素检验证书;分析检验证书”,正确的翻译为( )。
下列情况中属于特大旅游安全事故的是()。
WhichofthefollowingstatementsabouttheSituationalApproachisNOTtrue?
中国古代无论是奴隶制还是封建制,都受到宗法制度和宗法精神的强烈影响。它不仅是宗族凝聚力的一种保障,而且是王权的重要支柱。君权、地方行政权都渗透了宗法父权的因素。这是封建专制制度得以长期牢固统治的条件之一。在国家的立法中,不仅确认了有关封建宗法制度的大量内容
民主的根本性质最终取决于()
Islamiclawisaparticularlyinstructiveexampleof"sacredlaw".Islamiclawisaphenomenonsodifferentfromallotherforms
对于内存容量而言,1KB=【59】B;而对于外存(如磁盘、U盘等)容量而言,1KB=【60】B。
最新回复
(
0
)