首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
admin
2019-06-11
67
问题
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Option Base 1 Private Function FindMin(a()As Integer) Dim Start As Integer Dim Finish As Integer,i As Integer Start=
LBound
(a)’求数组下界值 Finish=
UBound(a)
’求数组上界值 Min=
a
(Start)’将第一个数赋给最小值进行比较 For i=Start To Finish’循环判断找最小值 If a(i)
<
Min Then Min=
a(i)
Next i FindMin=Min End Function Private Sub Command1_Click() Dim arr1 Dim arr2(4)As Integer arr1=Array(Val(Text1.Text),Val(Text2.Text),Val(Text3.Text),Val(Text4.Text))’申请arrl数组并初始化 For i=1 To 4 arr2(i)=CInt(arr1(i))’CInt函数将 arr1中的数值转换为整型 Next i M=FindMin(
arr2
) Print"最小值是:";M End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/aRUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Picturel的图片框和一个名称为Timer1的计时器控件,并有下面程序代码:Dimx%,V%PrivateSubForm_Load()x=Picturel.Width*2y=Picture
(1)在名称为Form1、标题为“输入”、最大化按钮失效的窗体上画一个名称为Label1的标签控件,其标题为“输入密码”;再向窗体内画一个名称为Text1的文本框控件,并清空其中的文本。程序执行时,用户在文本框中最多可输入由6个字符组成的密码,密码字符在文
在窗体上画1个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()Dima(3,3)Form=1To3Forn=1To3Ifn=mOrn=4一mThe
当文本框中的内容发生改变时所触发的事件是()。
(1)在名称为Form1的窗体上添加一个名称为Shapel的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarrayl(10,10)AsIntegerDimiAs
在窗体上域一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrirateSubCommand1_Click()a=InputBox("Enteranin
数据库设计过程不包括
负责数据库中查询操作的数据库语言是
下列关于数据库设计的叙述中,正确的是
随机试题
子宫颈非典型增生的好发部位是子宫颈
公正原则的前提是维护杜绝医疗服务中的不合理现象是维护
马歇尔试验的技术指标包括()。
列入经国家院批准设立的特殊区域的范围包括( )
田先生经营理发店多年,按照国家规定,城镇个体工商户和灵活就业人员都要参加基本养老保险,缴费统一为()。
甲被检察机关指控犯有三项罪行:第一项,伪造盖有中华人民共和国商务部公章的批文。第二项,持该伪造批文和所谓中国石材进出口公司出口业务合同,到某石材加工厂对该经理乙谎称能联系出u香港的石材业务。然后以虚构的香港某公司的名义与石材厂签订了500万吨石材的购销合
确保2020年如期全面建成小康社会,必须确保2020年农村贫困人口实现脱贫、贫困县全部摘帽、解决区域性整体贫困。2014年末,我国仍有7017万农村贫困人口。要通过实施脱贫攻坚工程,实施精准扶贫、精准脱贫,确保2020年7017万农村贫困人口实现脱贫。具体
A、 B、 C、 D、 D
阅读下列说明,回答下列问题。【说明】某项目是一个新产品开发项目,项目计划开发周期为12个月,项目团队有11个人,包括:项目经理1人,开发工程师5人,测试工程师2人,文档工程师1人,配置管理1人,SOA1人。项目于2010年7月1日开
面向对象技术中,对象是类的实例。对象有三种成分:______属性和方法(或操作)。
最新回复
(
0
)