首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最小值”),即可求出其最小值
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最小值”),即可求出其最小值
admin
2020-07-22
68
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最小值”),即可求出其最小值,并在窗体上显示出来(如图所示)。这个程序不完整,请把它补充完整,并使其能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和End Function之间填人你编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Command1_Click() Dim arrN(30) As Integer Dim Min As Integer Randomize For i = 1 To 30 ’arrN(i) = Int(Rnd * ?) Next i ’? = arrN(1) For i = 2 To 30 ’If ? Then Min = arrN(i) End If Next i Print Min End Sub 程序结束 参考答案 第1个?处填入:1000 第2个?处填入:Min 第3个?处填入:arrN(i) < Min或Min > arrN(i) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Sub SaveData() Open App.Path & "\" & "outtxt.txt" For Output As #1 Print #1, Text1.Text Close #1 End Sub Function Fun() End Function Private Sub Command1_Click() d = Fun() Text1.Text = d SaveData End Sub 程序结束 参考答案 Function Fun() Dim s As Integer, i As Integer For i = 0 To 1000 If i Mod 7 <> 0 Then s = s + 1 End If Next i Fun = s End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/FNHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
窗体上已有1个名称为Pieture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Pieture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是(
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上面有两个名称分别为Text1、Text2的义本框,其中Textl可多行显示。请画两个名称为Commandl、Command2,标题为“产生数组”、“查找”的命令按钮。如图2.216所示。程序功能如下:
以下关于过程及过程参数的描述中,错误的是()。
三角形的构成条件是:任意2边之和大于第3边。设变量a、b、c是3条直线的长度,要求判断这3条直线能否构成一个三角形。下面有3个程序段可以正确判断,另一个不能正确判断的是
要想使列表框只允许单选列表项,应设置的属性为( )。
实现字符的UniCode编码方式与ANSI编码方式相互转换的函数是()。
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是( )。
设x=4,y=8,z=7,则以下表达式的运算结果是()。x<yAnd(Noty>z)Orz<x
下列不一定是传值的虚实结合方式的选项是()。
随机试题
查封、扣押决定书应当载明的事项包括()
代谢当量(Met)是指基础状态时的耗氧量,1Met等于
预防气性坏疽的最可靠治疗方法是
A.球后视神经炎B.视乳头炎C.视神经脊髓炎D.视乳头血管炎E.Leber遗传性视神经炎可分为视乳头水肿型和视网膜中央静脉阻塞型的是
男,6个月。患法洛四联症。近2天反复于哭闹时突然四肢抽搐,青紫加重,神志不清,呼吸急促,持续时间2~3分钟。主要原因是()
赔偿损失与支付违约金两种承担民事责任的方式()。
在预算定额的编制阶段,以下选项中不属于确定编制细则阶段内容的是()。
下列情形不能构成我国《继承法》上的父母子女关系的是()。
需求曲线向右上方倾斜的充分必要条件是()。
OneofthedifficultiesinbuildinganSQL-likequerylangefortheWebistheabsenceofadatabaseschemaforthishuge,heter
最新回复
(
0
)