首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
admin
2019-06-11
64
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
利用属性窗口为窗体的下面4个属性设置了值,其中错误的设置是()。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Lea(xStr)
当文本框中的内容发生改变时所触发的事件是()。
编写如下程序代码:PrivateSubCommand1_Click()DimtAsIntegerDimnAsInteger,xAsIntegert=0F0rn=1To12
设有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*yEndFunction在窗体上画一个命令按钮,其
阅读程序:PrivateSubForm_Click()X=50Fori=1To4Y=InputBox("请输入一个整数")y=Val(y)IfvMod5=0Thena=
下列关于数据库设计的叙述中,正确的是
随机试题
A.贝壳B.耳后腺及皮肤腺的干燥分泌物C.干燥整体D.除去内脏的干燥体E.病理产物蟾酥的药用部位是()。
学习社会强调四种基本的学习,即__________、学会做事、学会共同生活和学会生存。
下列说法中属于代谢性酸中毒的病因的是
下列各项中,不属于人工日工资单价中特殊情况下支付的工资是()。
某公募基金管理公司基金经理甲的妻子进行证券投资,甲没有向所在公司事先申报,违反了()职业道德要求。[2015年9月真题]
阅读下列材料,根据要求写一篇论说文。我国著名的教育家叶圣陶说:“教育就是培养习惯。”习惯就像是走路,人们如果选择了一条道路,就会沿着这条道路一直走下去。好的习惯是成就孩子美好未来的捷径,能让孩子在不知不觉中健康成长;不好的习惯则像缠在身上的铁链,阻碍着孩
甲某是A电脑公司的销售人员,随身携带盖有该企业公章的空白合同书,便于对外签约。后甲某因收取回扣而被公司除名,但空白合同书未被该公司收回。甲某以此合同书与他人签订了一份电脑买卖合同,该买卖合同的性质应被认定为()。
下列不属于信息存储的条件的是()
Jason(he)wasanidealist(who)refusedtomakeany(compromise)concerningthe(establishment)oftheassociation.
Bysayingthatvillageisnotdead,but"villagelife"isdead,thewritersuggeststhat______.Theexpression"thereisnopoi
最新回复
(
0
)