首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生30个0~800的随机整数,放入一个数组中,然后输出这30个整数中小于400的所有整数的个数。程序运行后,单击名称为Commandl的命令按钮,其标题为“输出小于
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生30个0~800的随机整数,放入一个数组中,然后输出这30个整数中小于400的所有整数的个数。程序运行后,单击名称为Commandl的命令按钮,其标题为“输出小于
admin
2010-07-13
36
问题
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生30个0~800的随机整数,放入一个数组中,然后输出这30个整数中小于400的所有整数的个数。程序运行后,单击名称为Commandl的命令按钮,其标题为“输出小于400的整数的个数”,即可求出这些整数的个数,并在名称为Textl的文本框上显示出来,如图34—4所示。这个程序不完整,请把它补充完整,并能正确运行。
注意:去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp,相应的窗体文件为sj4.frm,在窗体上有一个命令按钮和两个文本框。程序运行后,单击命令按钮,即可计算出20~200范围内能被5整除的所有整数的和及个数,并分别在文本框中显示出来,如图34—5所示。在窗体的代码窗口中,已给出了部分程序,其中计算能被5整除的整数的和及个数的操作在通用过程Func中实现,请编写该过程的代码。
注意:请勿改动程序中的任何内容,只在Function Func()和End Function之间填入你编写的若干语句。最后把修改后的文件按原文件名存盘。
选项
答案
(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(30)As Integer’声明一个数组 Dim num As Integer num=0 For i=1 To 30 a(i)=
Rnd()
*(800-0) ’将0~800的随机数存人数组 If a(i)<400 Then num=
num
+1 ’如果数小于400,计数加1 End If Next i Textl.Text=num’将得到的总数放在Textl中显示 End Sub 单击[*]按钮运行程序,并按要求保存。 (2)要判断一个数能不能被5整除,使用求余运算符Mod,如果余数不为0,则表示该数不能被整除。程序提供的代码如下: Dim num As Integer Private Sub Commandl_Click() Textl.Text=Func ’调用Func函数 Text2.Text=num’全局变量 End Sub 补充后的Func函数参考代码如下: Function Func()As Long’返回Long型数值 Dim i As Integer Func=0 num=0 For i=20 To 200 If i Mod 5=0 Then num=hum+1 ’如果能被5整除,则计数加l Func=Func+i’算人总和中 End If Next i End Function 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/tGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是【】。
按照“后进先出”原则组织数据的数据结构是( )。
下列选项中可以创建一个标识有“关闭”的按钮语句的是( )。
Java源文件中最多只能有一个______类,其他类的个数不限。
在关系运算中,______运算是对两个具有公共属性的关系所进行的运算。
下面程序实现对zip文件file.zip的查询,在横线处填上正确的语句______。packagetest;importjava.io.*;importjava.util.*;impor
在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是______。
若按功能划分,软件测试的方法通常分为白盒测试方法和______测试方法。
在文件类提供的方法中,用于创建目录的方法是.
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
随机试题
对于数组,通常具有的基本操作有______种,它们分别是______。
谐振是指
对普萘洛尔与硝酸甘油合用描述正确的有
患者,女,50岁。右肩疼痛并活动障碍1周,诊为右肩周炎,既往有胃溃疡病史,经常感上腹部不适。该患者可以使用药物的是
汇明公司在甲银行开立基本存款账户。2013年7月,汇明公司发生的结算业务如下:(1)7月3日,汇明公司与乙银行签订短期借款合同后,持相关开户资料向乙银行申请开立了一般存款账户。(2)7月8日,汇明公司派出纳王某到乙银行购买现金支票并办理提取现金业务。
在某个时期内,个体对某种刺激特别敏感。过了这个时期,同样的刺激对之影响很小或没有影响。这个时期称为()。
案例:在歌唱课《洪湖水,浪打浪》上,王老师在课前布置了预习任务,请同学们了解洪湖赤卫队的相关故事。上课伊始,同学们争先恐后地分享自己了解到的革命故事,由此顺利导入本课。王老师紧接着为大家播放了《洪湖赤卫队》的片段,分析了故事中主要人物的性格特征,请同学们
强调课程实施不是也不可能由课程专家完全预设,而是一个师生在具体的教育情境中共同创造新的教育经验的过程。在这一过程中,师生不是消极被动的“消费者”,而是主动的开发者。这一思想体现了课程实施的()。
只要产生了法律纠纷,就可以实施法律救济。()
Accordingtothepassage,whichofthefollowingisTRUE?Whenoneplayersays"check",itmeans______.
最新回复
(
0
)