VB程序设计题电子版.docVIP

程序设计题电子版 （事件）单击事件。 （响应）生成一个一维数组（10个数组元素依次为15、32、72、43、96、18、3、177、88、17），写程序求出这个数组的最大值、最小值和平均值，并输出在窗体上。将最大值、最小值、平均值分别存入变量Max、Min、Aver中。 答案： Dim a 9 As Integer Dim i, s As Integer a 0 15 a 1 32 a 2 72 a 3 43 a 4 96 a 5 18 a 6 3 a 7 177 a 8 88 a 9 17 Max a 0 Min a 0 s 0 For i 0 To 9 If a i Max Then Max a i End If If a i Min Then Min a i End If s s + a i Next aver Int s / 10 Print CStr Max Print CStr Min Print CStr aver （事件）单击按钮“绘制”。 （响应）利用“@”字符打印如下图字母“T”.要求：字母“T”的横线和竖线分别用一维For循环语句打印，使用Tab（）函数定位。（其中横线有19个“@”字符，竖线有10个