Dim A(100) As Double
Dim I As Long
Dim Total As Double
Dim Average As Double
Total=0
For I=1 to 100
Total=Total+A(100)
Next I
Average=Total/100能詳細(xì)一點(diǎn)嗎Dim A(1 To 100) As Double'定義能夠存儲100個數(shù)的數(shù)組Dim I As Long'定義循環(huán)變量Dim Total As Double'定義“數(shù)組的和”變量Dim Average As Double'定義“數(shù)組的平均值”變量'給數(shù)組賦初值For I=1 to 100A(I)=INext I'對數(shù)組求和Total=0For I=1 to 100 Total=Total+A(100)Next IAverage=Total/100 '求數(shù)組平均值