vbvb期末考试实验答案(2)

vb作业

自定义函数Max(x,y,z)的编写：

Function Max(x As Integer, y As Integer, z As Integer) As Integer

…… '编写x、y、z中找最大的程序段并将结果赋值给Max

End Function

定义一个有7个数组元素的一维数组a，Dim a(1 To 7) As Integer,随机产生7个∈[0，50]之间的整数赋值给a(1)～a(7)。

前三个数的最大值：max1=Max(a(1),a(2),a(3))

前五个数的最大值: max2=Max(max1,a(4),a(5))

或 max2=Max(Max(a(1),a(2),a(3)),a(4),a(5))

七个数中的最大值：max3=Max(max2,a(6),a(7))

程打印出原始数据；再将该数组中的偶数组成一个新的数组，再调用该通用过程打印出偶数数组。

打印数组的通用过程设计参考上课讲义 5. “第四题”：编写一个每行可以打印5个下标变量的打印数组的通用过程，。随机产生一个∈[100，500]、有20个下标变量的数组，调用该通用过

在需要输出数组的时候调用该通用过程

下载10_2.exe

请参考10_2.exe程序的运行结果，新建一个工程，完成"调色板"程序的设计，该程序由红绿兰三原色进行调色，如果预览满意，单击"应用"按钮，将调好的颜色作为文本框中文字的颜色。将完成后的工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_2目录下。

具体要求如下：

1. 应用程序界面设计参考图示。

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库vbvb期末考试实验答案(2)在线全文阅读。