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

[µo°Ý] ½Ð±Ð: ¦p¦ó§Q¥Î°j°é°ÊºA²£¥ÍÅܼÆ

[µo°Ý] ½Ð±Ð: ¦p¦ó§Q¥Î°j°é°ÊºA²£¥ÍÅܼÆ

Dear ¤j¤j
§Ú·Q²£¥Í¤@¨ÇarrayªºÅܼơA¦p¤U:
dim ¦¬½Lvalue as Variant
dim ¥~¸êvalue as Variant
dim §ë«Hvalue as Variant
dim ¦ÛÀçvalue as Variant
dim ¿Ä¸êvalue as Variant
dim ¿Ä¨évalue as Variant
................
dim ¦¬½Lprice as Variant
dim ¥~¸êprice as Variant
dim §ë«Hprice as Variant
dim ¦ÛÀçprice as Variant
dim ¿Ä¸êprice as Variant
dim ¿Ä¨éprice as Variant
................
¦]¬°«Ü¦h¡A¦Ó¥B±`±`¥u¦³Åܼƪº«á¥b¬q¤£¤@¼Ë(·|¦³ÅܤÆ)¡A¦ýÅܼƫe¥b¬q¦WºÙ³£¤@¼Ë

½Ð°Ý¦³¨S¦³¥i¯à±N: ¦¬½L»ù¡A¥~¸ê¡A§ë«H¡A¦ÛÀç°Ó¡A¿Ä¸ê¡A¿Ä¨é..¥ýÅܦ¨array

Dim MySheets(8) As String
    MySheets(0) = "¦¬½L"
    MySheets(1) = "¥~¸ê"
    MySheets(2) = "§ë«H"
    MySheets(3) = "¦ÛÀç°Ó"
    MySheets(4) = "¿Ä¸ê"
    MySheets(5) = "¿Ä¨é"
    MySheets(6) = "¶}½L"
    MySheets(7) = "³Ì°ª"
    MySheets(8) = "³Ì§C"

¯à¤£¯à§Q¥Î°j°é±N¥¦­Ì¥[¤W«á¥b¬qªº¦WºÙ¡A¨Ó«Å§iÅܼÆ
¦pªGVB¤£¦æC++¥i¥H¶Ü?

·PÁÂ!

¦]¬°¤£ª¾±z¬O§_¨Ï¥Îªº¬OVB.NET, ¦pªG¬Oªº¸Ü, §Ú·|«Øij¤À¶}¨â³¡¤À,

²Ä¤@­Ó³¡¥÷«Ø¥ß§A©Ò»Ý­nªºª«¥ó¥H¤Î¥LªºÄÝ©Ê,£¾¥H±zªº½d¨Ò¨Ó¬Ý¦³¦¬½L,value,price
©Ò¥H§Ú·|­q¥Xname,value,priceµ¥¤T­ÓÄÝ©Ê

²Ä¤G³¡¤À§Q¥Î°j°énew ¥X³o­Óª«¥ó,¶ñ¤J¬ÛÃöÄÝ©Ê,¶ë¶i¤@­Óarraylist or list

µM«á¬Ý­n«ç»ò¥Î³o¨Çª«¥ó¦A±qarraylist or list¨ú¥X¨Ï¥Î

TOP

¦^´_ 1# bugsfamily
§Ú·|¥Î2ºû°}¦C¨Ó³B²z³o¼Ëªº°ÝÃD
Dim value(8,100) as Variant                      '²Ä¤Gºû«×ªºsize ¥iµø¸ê®Æ¶qªº¤j¤p¦Ó¨M©w, ¤]¥i¥ý¤£³]©w, ¦A¥ÎRedim¨Ó§ïÅÜ
Dim price (8,100) as Variant
§Q¥Î²Ä¤@ºû«×ªºindex ¨Ó¥Nªí¥¦¬O­þ¤@Ãþªº¸ê°T
¦pvalue(0, x)¥Nªí¦¬½Lªºvalue
   value(1,x)¥Nªí¥~¸êªºvalue
.........
   value(8,x)¥Nªí³Ì§Cªºvalue
Alex

TOP

¦^´_  bugsfamily
§Ú·|¥Î2ºû°}¦C¨Ó³B²z³o¼Ëªº°ÝÃD
Dim value(8,100) as Variant                      ' ...
alexliou µoªí©ó 2012-5-5 10:59



    ·PÁ¡C

TOP

        ÀR«ä¦Û¦b : ·O´d¨S¦³¼Ä¤H¡A´¼¼z¤£°_·Ð´o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD