组元素依次为：15、23、72、43、96、23、3、65、88、
（响应）：求1121314…1991100的值。将结果存入变量J中。
17），写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。将最大值，最小值，代码：DimiAsI
teger
平均值分别存入变量MaxMi
Aver中。
Fori1To100
Dima
Next
DimisAsI
teger
IfiMod21The

aarray1523724396233658817
jj1i
Maxa0
Else
Mi
a0
E
dIf
s0
IfiMod20The

Fori0to90
jj1i
IfaimaxThe

E
dIf
maxai
Pri
tj
E
dIf
Ifaimi
The

mi
ai
第三十九题
E
dIf
题目：（事件）：单击窗体。
ssai
（响应）：求1234…100的值，并把结果输出在窗体上。结果存入变量SUM中。
Next
代码：DimiAsI
teger
averI
ts10
Fori1To100
Pri
tCStrmax
SumSumi
Pri
tCStrmi

Next

f
Pri
tSum
E
dIf
第四十题
SumSumji
题目：（事件）：双击窗体。
Next
（响应）：求1235813…的前20项和，并将结果在窗体上输出。将结果存入变量SUMPri
tSum
中。
代码：DimiAsI
teger
Dimj1To20AsI
teger
Fori1To20
Ifi3The

ji1
Else
jiji1ji2
E
dIf
SumSumji
Next
Pri
tSum
第四十三题题目：（事件）：双击窗体。
（响应）：求151015…500的和，并将结果输出在窗体上。将结果存入变量SUM中。代码：DimiAsI
tegerFori1To500IfiMod50The
SumSumiE
dIfNextPri
tSum
第四十六题题目：（事件）：单击窗体。
（响应）：求数列133927…前6项的和，并将结果输出在窗体上。将结果存入变量SUM中。代码：DimiAsI
tegerDimj1To6AsI
tegerFori1To6Ifi3The
ji3i1Elsejiji1i2

fr