首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机函数产生n个1~100范围的随机数,然后求出去掉一个最大数和最小数的平均数。根据题意,请完善下列程序: Private Sub Command1_Click
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机函数产生n个1~100范围的随机数,然后求出去掉一个最大数和最小数的平均数。根据题意,请完善下列程序: Private Sub Command1_Click
admin
2013-04-11
144
问题
在窗体上画一个名为Command1的命令按钮。下列程序的功能是:从输入对话框输入一个正整数n。用随机函数产生n个1~100范围的随机数,然后求出去掉一个最大数和最小数的平均数。根据题意,请完善下列程序:
Private Sub Command1_Click()
Dim ave As Single, max As Integer, i As Integer, n As Integer
Dim min As Integer, Sum As Integer, s As String
Dim t As Integer
s=InputBox("输入一个正整数:")
n=Val(s)
If n>0 Then
max=n: min=n: Sum=0
For j=1 To n
t=【 】
Print t;
Sum=Sum+t
If t<min Then
min=t
Elself max<t Then
max=t
End If
Next j
【 】
ave=Sum/n
MsgBox"平均值="+Str(ave),,"去掉最大数和最小数后"
End If
End Sub
选项
答案
Int(Rnd*100+1) ,Sum=Sum-max-min
解析
首先假定输入的正整数为最大数(max)和最小数(min)初值。本题采用了InputBox从键盘上输入数据,用Ms-gBox输出结果。在程序中min必须赋一个初值,否则min默认为0。在循环中,每产生一个数就和max及min进行比较,大的放入max,小的放入min,并计算各数之和。循环结束后,减去max和min,求得平均数ave。
转载请注明原文地址:https://kaotiyun.com/show/64hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列四个关于DoEvents语句的叙述中,正确的是______。
在KeyDown和KeyUp事件过程中,当参数Shift的值为十进制数1,2,4时,分别代表Shift、【】、【】。
阅读程序:OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()DimiAsInteger,jAsIntegerReDimarr(3,2)
能够将Picture对象Picl加载当前目录中的face.bmp的语句是
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存在方式是______。
执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的内容是:______。atrInput=InputBox(“请输入字符串”,“字符串对话框”,“字符串”)
决定控件上文字的字体、字形、大小、效果的属性是______。
下列选项中,不属于模块间耦合的是
设a=3,b=5,则以下表达式值为真的是______。
一个算法通常由对数据对象的运算和操作以及算法的【】两种基本要素组成。
随机试题
下列哪项不是胃癌的组织学类型
有如下类声明:classTe{public:Te();//①Tete;//②Te*
下列关于葡萄糖重吸收的叙述,正确的是()
ManypeoplebelievethatAmericanslovetheircarsalmostmorethananythingelse.Theyare【C1】______aboutcars.Notonlyisthe
患者,女性,24岁,慢性阑尾炎,择期手术治疗。护士告诉患者术前常规禁食时间不少于
石油、化工装置停车检修是为了保证检修动火和进行设备内作业安全,在检修范围内的所有设备和管线中的易燃、易爆、有毒有害气体进行置换,如需检修动火,置换用惰性气体中氧的体积百分浓度最高不得超过()。
以下哪类人员不是被禁止参与股票交易的人员()。
下列各项中,关于货币具有时间价值的原因有()。
阅读文本材料和具体要求,完成问题。左传.烛之武退秦师晋侯、秦伯围郑,以其无礼于晋,且贰于楚也。晋军函陵,秦军汜南。佚之狐言于郑伯曰:“国危矣,若使烛之武见秦君,师必退。”公从之。辞曰:“臣之壮也,犹不如人;今老矣,无能为也已。
西双版纳植物园中有两种樱草,一种自花授粉,另一种非自花授粉,即须依靠昆虫授粉。近几年来,授粉昆虫的数量显著减少。另外,一株非自花授粉的樱草所结的种子比自花授粉的要少。显然,非自花授粉樱草的繁殖条件比自花授粉的要差。但是,游人在植物园多见的是非自花授粉樱草而
最新回复
(
0
)