首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程FindMin求数组的最小值。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来(如图所示)。 要求:
admin
2019-06-11
39
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
当前文件夹中设有一个文本文件Filel.txt,并有下面程序代码:PrivateSubCommand1_Click()DimchAsStringOpen"Filel.txt"ForInputAs#1D
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimSAsInteger,NAsIntegerS=1DoS=(
为了使文本框Text1中的文本不能被编辑,但能滚动和选择,下列正确的设置为()。
设a=5,b=10,执行语句c=Int((b—a)*Rnd+a)+1后,c中数值的范围是()。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Lea(xStr)
定时器的Interval属性的值是一个整数,它表示的是()。
关于水平滚动条,如下叙述中错误的是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
在关系数据库中,用来表示实体间联系的是
随机试题
( )是指公务员享有对机关及其领导人工作中的缺点和不足提出批评、对改进机关及其领导人的工作提出建设性意见的权利。
所谓发布网站,就是把网站中的内容传到Web服务器上。
求空间曲线,在点(1,1)处的切线方程和法平面方程.
A.肝细胞大片坏死B.肝细胞结节状再生C.二者皆有D.二者皆无急性普通型肝炎
井筒在施工时可能会出现涌水,下列关于工作面排水的说法正确有()
土质改良是防治管涌和流沙的基本措施之一,常用的方法有()。
需要办理注销税务登记的情形有()。
教育的“心理起源说”认为教育起源于()
近代法国著名科学家法拉第,发现了电磁感应规律。有一种看法是,由于他没有用最科学最严密的语言表达出来,因此一直没有得到科学界的承认,直到麦克斯韦完整地表述了这一规律,才得到人们的正式承认。以下哪项,从上述题干中推出最为恰当?
Evenintheabsenceofdefinitivescienceonthepotentialhazardssurroundingtheuseofelectroniccigarettes,regulationsare
最新回复
(
0
)