|
sub ppp()/ r3 E* y9 M9 N# b% q' Q
首先读入数据入AArray5 ?% P- c) r: O1 n V, k
然后计算, as follows:
( d' D9 X8 }# J7 O( W7 } dim i as long, Num as long2 ~; x Y& @, e% G4 k
Num=0
2 F: h& J0 s) S6 E# d2 Y& R for i=1 to 11 $ Y* ^, E. u% L2 Y
if AArray.IfBoy=true then Num=Num+1 k# M+ }: h* o; v7 W; M. h
if Num=n then return the value
- ]% }7 b( _* ^4 P, u0 @1 x next i
& K- T7 c2 R. V6 {; fend sub C2 G- j4 Z# K% U4 V
在这里,n表示(第n个值) |
|