在考生文件夹下有一个工程文件sjt5．vbp。程序运行时，单击“显示数据”按钮，则将考生文件夹下in5．dat文件的内容读入一维数组a中，并按下标顺序将数组a各元素的值显示在List1列表框中；单击“移动”按钮，则将数组a中的最大值移动到数组的最前面，其他

admin2019-05-14 83

问题在考生文件夹下有一个工程文件sjt5．vbp。程序运行时，单击“显示数据”按钮，则将考生文件夹下in5．dat文件的内容读入一维数组a中，并按下标顺序将数组a各元素的值显示在List1列表框中；单击“移动”按钮，则将数组a中的最大值移动到数组的最前面，其他数据的排列顺序不变，并将移动后的结果显示在List2列表框中。单击“保存”按钮。则保存移动后的结果。
要求：“显示数据”和“保存”按钮的Click事件过程已经给出，请编写“移动”按钮的Click事件过程实现上述功能。程序窗体界面如图所示。
注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前必须单击“移动”按钮，并单击“保存”按钮保存结果，否则无成绩。最后程序按原文件名存盘。

选项

答案[操作步骤] 步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。参考代码(画下划线部分是需填入的内容) Dim i，max，maxindex As Integer max=a(1) For i=2 To UBound(a) If a(i)＞max Then max=a(i) maxindex=i End If Next i List2．AddItem(a(maxindex)) For i＜＞maxindex Then List2．AddItem(a(i)) End If Next i 步骤3：调试并运行程序，关闭程序后按题目要求存盘。

解析

转载请注明原文地址:https://kaotiyun.com/show/oTUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

下列程序代码段中，在单击命令按钮调用SelMid函数时，其运行结果为()。PrivateFunctionSelMid(aStrAsString)AsStringDimtempAsStringDimsLe

请根据以下各小题的要求设计visualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个图片框，名称为P1，高为1800，宽为1700，通过属性窗口把图形文件picl．bmp放到图片框中(如图3—193所示)。注意：存盘时必

在考生目录下有一个工程文件sjt5．vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是：数列的前2项是小于10的正整数，将此2数相乘，若乘积

(1)在考生文件夹下有一个工程文件sit3．vbp，相应的窗体文件为sit3．frm，包含了所有控件和部分程序，如图3—90所示。要求如下：①利用属性窗口向列表框添加四个项目：VisualBasic、TurboC、C++、Java。②请编写适当的程

简述女性生殖系统炎症的常见病原体。

机体受到刺激而发生应激反应的系统是

符合规范要求的前提下，走廊排烟竖井按最经济布置时，数量最少应为：

消费税是对特定的消费品和消费行为征收的一种流转税。下列有关消费税的表述中错误的是()。

下列关于卷烟批发环节征收消费税的说法，正确的有()。(2014年考题改编)

近年来，我国已经采取的对外汇储备进行积极管理的措施有()。

资产负债表日，如果未来期间很可能无法获得足够的应纳税所得额用以抵扣递延所得税资产的利益，应当减记递延所得税资产的账面价值，并且按照资产减值准则的规定，在以后期间不得恢复其账面价值。()

下列属于时间知觉的依据的是()

TherearemanyreasonsforthesorrystateofcommercialaviationinAmerica.ButIcometoyouasatechnologycolumnisttotel

Onesummernight,onmywayhomefromworkIdecidedtoseeamovie.Iknewthetheatrewouldbeair-conditionedandIcouldn’t