欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片


Item ŒÙÐÔ

ÔO(sh¨¨)Öûò·µ»Ø Dictionary Œ¦ÏóÖÐÖ¸¶¨µÄ key Œ¦‘ª(y¨©ng)µÄ item£¬»ò·µ»Ø¼¯ºÏÖлùÓÚÖ¸¶¨µÄ key µÄ item¡£¿É×xŒ‘¡£

object.Item(key) [= newitem]

…¢”µ(sh¨´)

object

±Øßxí—¡£‘ª(y¨©ng)žé¼¯ºÏ»ò Dictionary Œ¦ÏóµÄÃû·Q¡£

key

±Øßxí—¡£Åc™zË÷»òÌí¼ÓµÄ item ÏàêP(gu¨¡n)“(li¨¢n)µÄ key¡£

newitem

¿Éßxí—¡£ƒHÓÃÓÚ Dictionary Œ¦Ï󣬲»ÄÜ‘ª(y¨©ng)ÓÃÓÚ¼¯ºÏ¡£Èç¹ûÌṩ´Ë…¢”µ(sh¨´)£¬„t newitem ÊÇÅcÖ¸¶¨µÄ key ÏàêP(gu¨¡n)“(li¨¢n)µÄí—Ä¿µÄÐÂÖµ¡£

ÕfÃ÷

Èç¹û¸ü¸Ä item •rδÕÒµ½ key£¬„tʹÓÃÖ¸¶¨µÄ newitem „“(chu¨¤ng)½¨Ò»‚€Ð嵀 key¡£Èç¹ûÔ‡ˆD·µ»ØÒ»‚€ÒÑÓÐí—Ä¿•rδÕÒµ½ key£¬„t„“(chu¨¤ng)½¨Ò»‚€Ð嵀 key ²¢ÇÒËüŒ¦‘ª(y¨©ng)µÄí—Ä¿žé¿ÕÖµ¡£

ÏÂÃæÀý×ÓÅeÀýÕfÃ÷ÈçºÎʹÓà Item ŒÙÐÔ£º

Function ItemDemo
  Dim d                   '„“(chu¨¤ng)½¨×ƒÁ¿.
  Set d = CreateObject("Scripting.Dictionary")
  d.Add "a", "Athens"     'Ìí¼ÓæIºÍí—Ä¿Œ¦.
  d.Add "b", "Belgrade"
  d.Add "c", "Cairo"
  ItemDemo = d.Item("c")  'µÃµ½í—Ä¿.         
End Function

Õˆ…¢é†

CompareMode ŒÙÐÔ | Count ŒÙÐÔ | Key ŒÙÐÔ

‘ª(y¨©ng)ÓÃÓÚ£ºDictionary Œ¦Ïó | Drives ¼¯ºÏ | Files ¼¯ºÏ | Folders ¼¯ºÏ | Matches ¼¯ºÏ