vb等级考试题目与评析49(编辑修改稿)

vb等级考试题目与评析49(编辑修改稿)内容摘要：

使其正确运行， 但不能修改程序中的其他部分。 最后把修改后的文件按原文件名存盘。 图 1 图 2 ********************************************************************** （ 2）在考生文件夹下有一个工程文件 （相应的窗体文件名为 ），其功能是通过调用过程 FindMin求数组的最小值，请装入该文件。 程 序运行后，在四个文本框中各输入一个整数，然后单击命令按钮，即可求 出数组的最小值，并在窗体上显示出来（如图所示）。 这个程序不完整， 请把它补充完整，并能正确运行。 要求： 去掉程序中的注释符，把程序中的。 改为正确的内容，使其 实现上述功 能，但不能修改程序中的其他部分。 最后把修改后的文件按原文件名存 盘。 第 1小题 列表框的 ListIndex属性 用来设置或返回列表框中当前选中的列表项。 列表框的 RemoveItem方法 用来删除列表框中的指定项目，其语法为： 列表框名 .RemoveItem索引值 解题方法： 打开工程文件 ，点击工具箱中的 ListBox和 TextBox控件图标，然后在窗体 上拖拉出一个列表框和文本框。 打开代码窗口，补充如下的代码： Private Sub Form_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) If Button = 1 Then = InputBox(请输入要添加的项目 ) End If If Button = 2 Then = InputBox(请输入要删除的项目 ) For i = 0 To 1 If (i) = Then i End If Next i End If End Sub 按要求保存文件即完成本题。 第 2小题： 本题的考查的是数组 的应用，通过调用过程 FindMin求数组的最小值， Ubound()函数是用来获得数组的上界，Lbound()函数是获得数组的下界，打开工程文件 ，在代码窗口中添加如下代码： Private Function FindMin(a()。