dim aa(90)
aa(0)=9387.78
aa(1)=4296.21
aa(2)=13499.6
aa(3)=11083.42
aa(4)=16326.37
aa(5)=16326.37
aa(6)=16326.37
aa(7)=21308.85
aa(8)=92899.48
aa(9)=11633.23
aa(10)=11633.23
aa(11)=16326.37
aa(12)=16326.37
aa(13)=23040.96
aa(14)=13055.31
aa(15)=16326.37
aa(16)=16326.37
aa(17)=16326.37
aa(18)=16326.37
aa(19)=12511.95
aa(20)=11083.42
aa(21)=5242.78
aa(22)=16326.37
aa(23)=9055.33
aa(24)=15607.31
aa(25)=15607.31
aa(26)=14529.04
aa(27)=14529.91
aa(28)=14529.91
aa(29)=14529.91
aa(30)=14529.91
aa(31)=14529.91
aa(32)=14529.91
aa(33)=14529.91
aa(34)=8477.19
aa(35)=15488.89
aa(36)=14893.16
aa(37)=14893.16
aa(38)=14323.59
aa(39)=15607.31
aa(40)=13623.25
aa(41)=60682.3
aa(42)=13018.8
aa(43)=11199.66
aa(44)=11199.66
aa(45)=9886.15
aa(46)=15631.28
aa(47)=15607.31
aa(48)=15607.31
aa(49)=15607.31
aa(50)=16575.73
aa(51)=16709.4
aa(52)=10025.64
aa(53)=10025.64
aa(54)=1673.85
aa(55)=16128.21
aa(56)=16128.21
aa(57)=16128.21
aa(58)=16128.21
aa(59)=16655.06
aa(60)=118804.14
aa(61)=13576.75
aa(62)=13623.25
aa(63)=13623.25
aa(64)=13623.25
aa(65)=14530.8
aa(66)=11914.53
aa(67)=14893.16
aa(68)=14893.16
aa(69)=30225.76
aa(70)=2094.63
aa(71)=10842.8
aa(72)=4061.4
aa(73)=15931.77
aa(74)=15999.18
aa(75)=15999.18
aa(76)=15214.27
aa(77)=15225.03
aa(78)=15214.27
aa(79)=85087.18
aa(80)=46437.61
aa(81)=33882.88
aa(82)=66090.76
aa(83)=5443.78
aa(84)=959.56
aa(85)=8880.97
aa(86)=13055.31
aa(87)=9055.33
aa(88)=12459.4
aa(89)=9387.78
aa(90)=13055.31
for i1 = 0 to 62
for i2 = i1 + 1 to 63
for i3 = i2 + 1 to 64
for i4 = i3 + 1 to 65
for i5 = i4 + 1 to 66
for i6 = i5 + 1 to 67
for i7 = i6 + 1 to 68
for i8 = i7 + 1 to 69
for i9 = i8 + 1 to 70
for i10 = i9 + 1 to 71
for i11 = i10 + 1 to 72
for i12 = i11 + 1 to 73
for i13 = i12 + 1 to 74
for i14 = i13 + 1 to 75
for i15 = i14 + 1 to 76
for i16 = i15 + 1 to 77
for i17 = i16 + 1 to 78
for i18 = i17 + 1 to 79
for i19 = i18 + 1 to 80
for i20 = i19 + 1 to 81
for i21 = i20 + 1 to 82
for i22 = i21 + 1 to 83
for i23 = i22 + 1 to 84
for i24 = i23 + 1 to 85
for i25 = i24 + 1 to 86
for i26 = i25 + 1 to 87
for i27 = i26 + 1 to 88
for i28 = i27 + 1 to 89
for i29 = i28 + 1 to 90
count = aa(i1)+aa(i2)+aa(i3)+aa(i4)+aa(i5)+aa(i6)+aa(i7)+aa(i8)+aa(i9)+aa(i10)+aa(i11)+aa(i12)+aa(i13)+aa(i14)+aa(i15)+aa(i16)+aa(i17)+aa(i18)+aa(i19)+aa(i20)+aa(i21)+aa(i22)+aa(i23)+aa(i24)+aa(i25)+aa(i26)+aa(i27)+aa(i28)+aa(i29)
if count = 444395.79 then
msgbox aa(i1)&Chr(10)&aa(i2)&Chr(10)&aa(i3)&Chr(10)&aa(i4)&Chr(10)&aa(i5)&Chr(10)&aa(i6)&Chr(10)&aa(i7)&Chr(10)&aa(i8)&Chr(10)&aa(i9)&Chr(10)&aa(i10)&Chr(10)&aa(i11)&Chr(10)&aa(i12)&Chr(10)&aa(i13)&Chr(10)&aa(i14)&Chr(10)&aa(i15)&Chr(10)&aa(i16)&Chr(10)&aa(i17)&Chr(10)&aa(i18)&Chr(10)&aa(i19)&Chr(10)&aa(i20)&Chr(10)&aa(i21)&Chr(10)&aa(i22)&Chr(10)&aa(i23)&Chr(10)&aa(i24)&Chr(10)&aa(i25)&Chr(10)&aa(i26)&Chr(10)&aa(i27)&Chr(10)&aa(i28)&Chr(10)&aa(i29),0,"记录完以后再点确定"
end if
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
msgbox "没有答案"