|
sub ppp()
! B [- J! K! W: {% X7 m, q 首先读入数据入AArray
/ n# K/ _, }) [9 W2 ]* M* |- x& _ 然后计算, as follows:; C$ S' v9 {/ e4 G
dim i as long, Num as long9 y% z- B, I& n$ {: a) ~
Num=0/ T$ H) M" _ H& o
for i=1 to 11
; \. M: K( x$ \. q( L9 J# M, | if AArray.IfBoy=true then Num=Num+1
( i3 l' x1 N6 P. B if Num=n then return the value( L; t. b; r1 K% b' G. B
next i
2 d/ l6 ?1 }7 pend sub M, Y; @. k8 n
在这里,n表示(第n个值) |
|