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

[µo°Ý] ¹B¥Î VBA»yªk ¼È®ÉÀÉÁY¹Ï§e²{?

[µo°Ý] ¹B¥Î VBA»yªk ¼È®ÉÀÉÁY¹Ï§e²{?

½Ð±Ð¦U¦ì°ª¤â:
                 If Dir(ThisWorkBook.Path1& "\" & "1.jpg") <> "" Then
                        Image1.Picture = LoadPicture(ThisWorkBook.Path1& "\" & "1.jpg")
                Else
                       Image1.Picture = LoadPicture("")
                End If
¦ý¬O  "1.jpg"  ­ìÀɤӤj¤F(11.5M)¡A³t«×ÅܺC¡C
¦p¦ó¹B¥Î  VBA»yªk ¨Ï¸Ó¹Ï  "1.jpg"  ÁY¬°1¡B2Mªº¼È®ÉÀÉ ÁY¹Ï§e²{¦b Image1 ¤º¦Ó¤£¼vÅT­ì¹Ï

                                                      ÁÂÁ«ü¾É

¦^´_ 1# yangjie
      ·q½Ð¤j¤j­Ì¨ó§U
      ¥i¦³¿ìªk§Q¥Î VBA  ±N*.jpg§ïÅܹ³¯À¦Ü20%¥B¥t¦s·sÀÉ

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD