ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

VBA»P¾ðª¬¹Ï§PÂ_·Ç«h

VBA»P¾ðª¬¹Ï§PÂ_·Ç«h

½Ð±Ð¦U¦ì¤j¤j

¤p§Ì­Y¬O¹J¨ì¾ðª¬¹Ï§PÂ_ÅÞ¿è®É¡A
³£¬O¨Ï¥ÎIF»yªk


¦ý¬O©¹©¹¼g¥X¨Óªºµ{¦¡½X¡A¦Û¤v¬Ý³£Ä±±o¦n¶Ã¡A
¦³ÂI¹³¬O³o¼Ë:

----------------
sub xx()
Dim xx
If xx   then
   if xx then
       if xx then
           if xx then
           end if
       end if
  end if
end if

end sub
-------------------
°²¨Ï¤§«á·Q¨ì­n­×§ïµ{¦¡½X®É¡A
©¹©¹¦Û¤v¤]¬O¬Ý±o¦³ÂI²´ªá¡A

¦]¦¹·Q½Ð±Ð¦U¦ì¤j¤j¡A¹J¨ìÃþ¦üª¬ªp®É
³£¬O¨Ï¥Î¦óºØ¤è¦¡³B²z©O?

¥ÎµÛ±ø¥ó½s¸¹
1 -> 11, 12  
11 -> 111, 112, 113
12 -> 121, 122, 123
§Ú²qªº°Õ

TOP

©ÎªÌ

dim  ±ø¥óLevel(1 to 4)
±ø¥óLevel(1) =Array( ±ø¥ó1 )
±ø¥óLevel(2) =Array( ±ø¥ó2_1, ±ø¥ó2_2 )
±ø¥óLevel(3) =Array( ±ø¥ó3_1, ±ø¥ó3_2 , ±ø¥ó3_3 )
±ø¥óLevel(4) =Array( ±ø¥ó4_1, ±ø¥ó4_2 , ±ø¥ó4_3  , ±ø¥ó4_4 )

TOP

        ÀR«ä¦Û¦b : §g¤l¬°¥Ø¼Ð¡A¤p¤H¬°¥Øªº¡C
ªð¦^¦Cªí ¤W¤@¥DÃD