vb的操作题分析和总结.docxVIP

1.（1）在考生文件夹中有工程文件，其中的窗体如图所示。 程序刚运行时，会生成一个有10个元素的整型数组。若选中查找最大值（或查找最小值）单选按钮，再单击查找 按钮，则找出数组中的最大值（或最小值），并显示在标签Label2中。请去掉程序中的注释符，把程序中的 改为正确的内容。 注意： 考生不得修改窗体文件中已经存在的程序。最后把 修改后的文件按原文 件名存盘。 Private Sub Command1_Click() x = a(1) y = a(1) For i = 2 To 10 If = True Then If a(i)  x Then x = a(i) End If ElseIf a(i) y Then y = a(i) End If Next If = True Then = x Else = y End If End Sub 2.（2）在名称为Form1的窗体上画一个名称Shape1的形状控件，在属性窗口中将其 设置为圆形。画一个名称为List1的列表框，并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为图形控件。单击列表框中 的某一项，则将所选的值作为形状控件的填充参数。例如，选择3，则形状控件中被竖线填充。如图所示。 要求： 程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为，窗体文件名为。 在