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

¥Îexcel¤Wºô¬d­µ¼Ð ¤S±¾¤F

¥»©«³Ì«á¥Ñ HSIEN6001 ©ó 2012-7-17 17:09 ½s¿è

¦^´_ 29# GBKEE

~¯Á¤Þ­È  ~
³Ì¤pªº¯Á¤Þ­È¬O----> 0 ¶}©lªºªø¾ã¼Æ.

³o#17
  1. Sub Ex_°}¦C()
  2.     Dim A As String, W, xi As Integer, i As Integer
  3.     W = Array("A", "B", "C", "D")
  4.     For i = LBound(W) To UBound(W)
  5.         MsgBox "Array(""A"", ""B"", ""C"", ""D"")" & Chr(10) & "W(" & i & ")  -> " & W(i)
  6.     Next
  7. End Sub
½Æ»s¥N½X
³o  
LBound(W) ---> LBound ¨ç数¥i¥H§ä¨ì数组¬Y¤@维ªº¤U­­¯Á¤Þ­È¡C
UBound(W)---> UBound ¨ç数¥i¥H§ä¨ì数组¬Y¤@维ªº¤W­­¯Á¤Þ­È¡C
¬GFor  i = LBound(W) To UBound(W) = 4 ­Ó¯Á¤Þ­È ; ³Ì¤pªø¾ã¼Æ¬°0  , ¬G i  = "W(" &  i & ") = 0 To 3
W(0) = A , W(1) = B , W(2) = C , W(3) = D

¦Ó : Split(¦r¦ê, "¤À³Î¦r¤¸")(1)---->«üªº¬O²Ä(1)­Ó¯Á¤Þ­È

¨âªÌªº() µL¬ÛÃö  ;¬O¤£¦PªºÀ³¥Î
.....³o¼ËªºÅÞ¿è,¹ï¶Ü?!

­n¥´µ²¤F   O_Q

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-7-17 17:14 ½s¿è

¦^´_ 31# HSIEN6001
³Ì¤pªº¯Á¤Þ­È¬O----> 0 ¶}©lªºªø¾ã¼Æ.  ³o¤£¤@©w
¨Ò  Dim A(4 To 7)  ->   ³Ì¤pªº¯Á¤Þ­È¬O 4 , ³Ì¤jªº¯Á¤Þ­È¬O7   
Option Base  0 ©Î 1   ¥i«ü©w³Ì¤pªº¯Á¤Þ­È¬° 0 ©Î 1
  1. Option Explicit
  2. Option Base 1
  3. 'Option Base ³¯­z¦¡ ¦b¼Ò²Õ¼h¦¸¤¤¥Î¨Ó«Å§i°}¦C¯Á¤Þªº¹w³]¤U­­¡C»yªk Option Base {0 | 1}
  4. Sub Ex_°}¦C()
  5. Dim A As String, W, xi As Integer, i As Integer
  6. W = Array("A", "B", "C", "D")
  7. MsgBox LBound(W)
  8. For i = LBound(W) To UBound(W)
  9. MsgBox "Array(""A"", ""B"", ""C"", ""D"")" & Chr(10) & "W(" & i & ") -> " & W(i)
  10. Next
  11. End Sub
½Æ»s¥N½X

TOP

¦^´_ 30# HSIEN6001
¦pªG©p¨Æ«e¨S¥[¤W On Error Resume Next °»´ú¨ÓÁ׶}¿ù»~ªº¸Ü¡A
¬O·|²£¥Í  °õ¦æ¶¥¬q¿ù»~ '53'¡G§ä¤£¨ìÀÉ®× ªº¡C
©p¨ººØ¼gªk¬O  ¤£ºÞ¤T¤C¤G¤Q¤@¥ý±þ¤F¦A»¡¡I
³o¦b¥¿³Wªºµ{¦¡¼¶¼g»yªk¤W¡A¬O¤£¤Ó¦nªº¡A¤]¬O§Ú·¥¤O¥hÁקKªº¡C
©úª¾·|²£¥Í¿ù»~«o¤S¨«®Ç¹DÁ׶}¡A­þ¤é¤£ÆF¥ú´N¶ã©I«s®â¤F¡I
Á`¤§§Ú¬O«Øij©p¾Ç²ß¥¿­y¼Ò¦¡¡A¹ï©pªº¥\¤O¼Wªø·|¦³¹ê½èÀ°§Uªº¡C

TOP

¥»©«³Ì«á¥Ñ HSIEN6001 ©ó 2012-7-17 18:37 ½s¿è

¦^´_ 32# GBKEE
¤j­P¤W,¦³·§©À¤F~^^

¦^´_ 33# c_c_lai
¥Î "§PÂ_¦¡" ªºÅÞ¿è¥h¤U«ü¥O , ÁקK¤§«áµ{§Ç¦]On Error Resume Next
¥¼¥X²{°»¿ùªº¬q¸¨´£¥Ü ; ¦Ó²£¥ÍRun¥X¤£§¹¾ãªºµ²ªG
¬O³o¼Ëªº·N«ä¡A§ÚÁA¸Ñ!

¨ü¯q¨}¦h¡AÁÂÁ¨â¦ì¤j¤j«ü¾É!

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD