首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmdl、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmdl、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,
admin
2015-06-30
19
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmdl、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,如图所示。程序功能如下:
①单击“产生数组”按钮时,随机生成20个0~10之间(不含0和10)的数值,并将其保存到一维数组a中,同时也将这20个数值在Text1文本框内显示。
②单击“统计”按钮时,统计出数组a中出现频率最高的数值及其出现的次数,并将出现频率最高的数值在Text2文本框内显示、出现频率最高的次数在Text3文本框内显示。
③单击“退出”按钮时,结束程序运行。
注意:不得修改窗体文件中已经存在的控件和程序,最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,设置控件的属性。程序中用到的控件及属性见表3.61。 [*] 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim a(20) As Integer, b(20) As Integer Private Sub Cmd1_Click() Text1.Text = "": Text2.Text = "": Text3.Text = "" For i = 1 To 20 ’ a(i) = Fix(Rnd * ? + 1) b(i) = 1 Text1.Text = Text1.Text + Str(a(i)) + Space(2) Next i End Sub Private Sub Cmd2_Click() fmax = 0 For i = 1 To 20 ’ For j = 1 To ? If a(i) = a(j) Then b(i) = b(i) + 1 End If Next j ’ If b(i) > ? Then fmax = b(i) Next i For i = 1 To 20 ’ If b(i) = ? Then Text2.Text = Text2.Text + Str(a(i)) + Space(2) End If Next i Text3.Text = fmax End Sub Private Sub Cmd3_Click() ’ ? End Sub 程序结束 参考答案 第1个?处填入:9 第2个?处填入:i - 1 第3个?处填入:fmax 第4个?处填入:fmax 第5个?处填入:End 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/NVQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
排序是计算机程序设计中的一种重要操作,常见的排序方法有插入排序、【】和选择排序等。
下列程序段的执行结果为______。K=0ForI=1To3A=I^I^KPrintA;NextI
执行以下程序段后,变量c$的值是【】。a$="北京"b$="Shanghai"c$="Left(a$,2)+String(3,"—")+Right(b$,8)
以下语句的输出结果是______。PrintFormat$(32548.5,“000,000.00”)
在VisualBasic中,下列运算符中优先级最高的是______。
下列关于dowhile...loop和do...100puntil循环执行循环体次数的描述正确的是()
两个或两个以上模块之间联系的紧密程度称为()。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
设有整型变量s,取值范围为0~100,表示学生的成绩。有如下程序段:IfS>=90ThenLevel=“A”ElseIfs>=75ThellLevel=“B”ElseⅡs>=60ThenLevel=“C”ElseLevel=“D
随机试题
论述法定资本制的核心内容。
A.吲哚美辛B.对乙酰氨基酚C.阿司匹林D.保泰松E.布洛芬抗炎抗风湿作用强、解热镇痛作用较弱的药物是
A.勇担风险,团结协作B.掌握手术指征,动机纯正C.以健康、稳定的情绪影响患者D.对症下药,剂量安全E.减轻痛苦,加速康复心理治疗的伦理学要求是()
与普罗帕酮相符的叙述是
(2008年)如图5—19所示,左端固定的直杆受扭转力偶作用,在截面1—1和2—2处的扭矩为()。
我国的世界遗产中属于文化与自然双遗产的项目有()。
国务院常务会议审议并原则通过了《全国土地利用总体规划纲要(2006——2020年)》,新修订的《纲要》提出了坚守()亿亩耕地红线的目标。
根据下面材料回答下列问题。中国网民总数量同比增长最多的年份是()年。
已知:MT公司2005年初所有者权益总额为1500万元,该年的资本保值增值率为125%(该年度没有出现引起所有者权益变化的客观因素)。2008年年初负债总额为4000万元,所有者权益是负债的1.5倍,该年的资本积累率为150%,年末资产负债率为0.25
Illegalpublicartisinthenews.ThemostnotoriousinstancethissummerwastheswitchofflagsontheBrooklynBridge,bytw
最新回复
(
0
)