- ©«¤l
- 549
- ¥DÃD
- 152
- ºëµØ
- 0
- ¿n¤À
- 691
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- OFFICE 2010
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-8-10
- ³Ì«áµn¿ý
- 2022-9-7
|
°}¦C¦³´XºØ¤è¦¡
¤@¡B¦Û¦æ³Ð«Ø
EX:dim aa:redim aa(1 to 10, 1 to 3)
¤G¡B¨ú¸ê®Æ·í§@°}¦C
EX:rng=range("a1").resize(10,3).value
¦r¨åª«¥ó
Set D = CreateObject("SCRIPTING.DICTIONARY")
for i = 1 to 10
d(i)=i*10
next
msgbox d(1) '³o¼Ëµª®×·|=10
msgbox d(2)'³o¼Ëµª®×·|µ¥©ó20
¦r¨åª«¥ó¥Dn¬O¥Î¨ÓÁקK°õ¦æÂù«¦^°é
¥ý¶]¤@¦¸¦^°é±N¦ì¸m°O¾Ð¦í
¦A¶]¯u¥¿ªº¸ê®Æ¦^°é
´N¥i¥Hª½±µ¥ÎD(X) ±o¨ìµª®× |
|