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

[µo°Ý] ¦³Ãöªí®æ¼Æ¦r¹ïÀ³¤å¦r(¦nÃø~¨D¯«¤H!!)«æ~ÁÂÁÂ

¦^´_ 2# qq910057


   
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 8# qq910057
¨â®a¥H¤W­n¥þ³¡Åã¥Ü¡A¤º«Ø¨ç¼ÆµLªk¹F¦¨
¨Ï¥Î¦Û©w¸q¨ç¼Æ
  1. Function Join_Str(Ar()) As String
  2. For Each a In Ar
  3.   If a <> "" Then Join_Str = IIf(Join_Str = "", a, Join_Str & ";" & a)
  4. Next
  5. End Function
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¤H¥Í¨S¦³©Ò¦³Åv¡A¥u¦³¥Í©Rªº¨Ï¥ÎÅv¡C
ªð¦^¦Cªí ¤W¤@¥DÃD