- ©«¤l
- 354
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 387
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- vba,vb,excel2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-1-8
- ³Ì«áµn¿ý
- 2024-8-2
 
|
¥»©«³Ì«á¥Ñ singo1232001 ©ó 2022-6-2 16:00 ½s¿è
¦^´_ 21# shuo1125
¥ÎÅ]Ã~¥@¬É¹CÀ¸ ¥]¥] ªº·§©À ¥]¥]¤º¥i©ñ¥ô¦óªF¦è ¥]¬A·sªº¥]¥]
dim br ¬O 1®æ¥]¥]
redim br(3,3 ) ¬O16®æ¥]¥] ¬O4x4(¹³¯u¹ê¹CÀ¸Åã¥Ü¨º¼Ë)
dim br(15) ¤]¬O 16®æ¥]¥] ¥]¥]¬O¤@±ø±q¤W¨ì¤U1234567....16®æ
' dim br(3) : dim ar(3) : for i = 0 to 3 : br(i)=ar : next
br(3)(3) ¤]¬O4®æ¥]¥]¤º©ñ¤J4®æ¥]¥] ¤]¬O4x4 16®æ
¥ÎÀÉ®×Á`ºÞ¸ê®Æ§¨·í·§©À ¸ê®Æ§¨¤º¥i¥H©ñ¥ô¦óªF¦è ¥]¬A·s¸ê®Æ§¨
dim br ¬O¤@Ó¸ê®Æ§¨ ¥u¯à©ñ¤@¼Ë
redim br(3,3) ¥i¥H©ñ16¼Ë 4x4(Ãþ¦ü ¤j¹Ï¥ÜªºÂsÄý¤è¦¡)
dim br(15) ¸ê®Æ§¨¤º¥i¥HÅý§A©ñ16Ó (Ãþ¦ü ±q¤W¨ì¤U ¸Ô²Ó²M³æ¼Ò¦¡)
¤@¼Ë¥i¥Hbr(3)(3) |
|