首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。
admin
2020-04-08
70
问题
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Option Base I Private Function FindMin(a()As Inte·ger) Dim Start As Integer Dim Finish As Integer,i As Inte-ger Start=
LBound
(a)′求教组下界值 Finish=
UBound(a)
′求数组上界值 Min=
a
(Start)’将第一个数赋给最小值进行比较 For i=Start To Finish’循环判断找最小值 If a(i)
<
Min ThenMin=
a(i)
Next i FindMin=Min End Function Private Sub Commandl_Click() Dim arrl Dim arr2(4)As Integer arrl=Array(Val(Textl.Text), Val(Text2.Text),Val(Text3.Text),Val (Text4.Text))′申请arrl数组并初始化 For i=1 To 4 arr2(i)=CInt(arrl(i))′CInt 函数将arrl中的数值转换为整型 Next i M=FindMin(
arr2
) Print"最小值是:";M End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】option base在模块级别中使用,用来声明数组下标的默认下界,option base后面只能是0或者l,默认值为0。
解析
文本框里的内容(包括数字)默认都是当做字符串来处理的,如果需要参与数据运算,则需先用Val()函数将其转化为数字(例如Val(TextI.Text))。CInt函数将数值转换为整型。
转载请注明原文地址:https://kaotiyun.com/show/b8Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0doUntilx=-1a=InputBox("请输入a的值")a=Val(a)b=I
为了使窗体左上角不显示控制框,需设置为False的属性是( )。
设有下面程序代码:PrivateSubCommand1_Click()DimaAsVarianta=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是( )。
以下叙述中正确的是()。
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
表达式12/2\4的值是( )。
表达式Int(8*Sqr(36)*10^(-2)*10+0.5)/10的值是()。
为了判断字符串变量strName中的姓名是否姓"李",应采用的表达式是
窗体上有一个名称为Commandl的命令按钮,其事件过程如下:PrivateSubCommand1_Click()x=”VisualBasicProgramming”a=Right(X,11)b=Mid(x,7,
随机试题
试析共产国际与1920年代中国革命的关系。(南开大学2013年中国历史真题)
______形成了产品和服务,是顾客满意的关键,对组织战略目标有着重要的影响,通常被称为核心过程。()
下述哪项不符合婴幼儿腹股沟疝
三棱的性状特征为
对化学反应甲+乙=丙+丁,下列说法正确的是()。
石家庄市居民郑某应聘到上海市软件公司短期工作,他欲报名参加当地旅行社组织的出境旅游,他应当向()市、县公安机关申请办理出境证件。
()实行由司法机关解释宪法的体制。
已知随机变量X与Y的相关系数且EX=EY,DX=则根据切比雪夫不等式有估计式P{|X—y|≥}≤______.
SQL语句中修改表结构的命令是()。
Afire______duringthenight.
最新回复
(
0
)