jackyq

byval object =byref object = objectªº¥»´L
byval ÅܼÆa = ÅܼÆaªº¤À¨­
byref ÅܼÆa = ÅܼÆaªº¥»´L

jackyq

byval ¥Î¨Ó«OÅ@¥»´Lªº
¦pªG¥»´L¸ê®Æ«Ü­«­n
¤£¤¹³\³Q¤H«§ï ( read  only )
´N¥i¥H¬£¤À¨­¥X¥h©ßÀYÅSÁy
¸U¤@¤À¨­¦b¥~¦a³Q¥L¤HÅQ­â
¬Æ¦Ü³Q±þ¦º
¬Æ¦ÜÁÙ¦ºªº«ÜºG
¥»´L¨ÌµM·|§¹¦nµL¯Ê

jackyq

Sub °õ¦æ§Ú()
  '¥Î ByRef µo¥Í ¥»´L«H®§ ³Q ¾F©~2 «§ï¨Æ¥ó
  '¾É­P ¾F©~3, ¾F©~4 ¦¬¨ì¿ù»~«H®§
  '§ï¦¨ ByVal ´N¥i¥HÁ׶}³Q ¾F©~2 «§ï
  
   msg = "§Ú¬O³¯¤p¬ü, ¬P´Á¤é±ß¤W6:00 Åwªï¨Ó§Ú®a»EÀ\"
   µo«H®§µ¹¾F©~1 msg
   µo«H®§µ¹¾F©~2 msg
   µo«H®§µ¹¾F©~3 msg
   µo«H®§µ¹¾F©~4 msg
End Sub


Sub µo«H®§µ¹¾F©~1(ByRef msg)
    MsgBox "¾F©~ 1 ¦¬¨ì«H®§: " + msg
End Sub
Sub µo«H®§µ¹¾F©~2(ByRef msg)
    MsgBox "¾F©~ 2 ¦¬¨ì«H®§: " + msg
   
    msg = "§Ú¬O³¯¤p¬ü, ¬P´Á¤é±ß¤W»EÀ\¦]¬°¦³¨Æºò«æ¨ú®ø"            '¾F©~2 ´c·d«H®§
End Sub
Sub µo«H®§µ¹¾F©~3(ByRef msg)
    MsgBox "¾F©~ 3 ¦¬¨ì«H®§: " + msg
End Sub
Sub µo«H®§µ¹¾F©~4(ByRef msg)
    MsgBox "¾F©~ 4 ¦¬¨ì«H®§: " + msg
End Sub

jackyq

about byval  2,3.....
(2) ¦ÛÂ૬ºA
(3)  ¦Ü©óª«¥ó
       ª«¥ó¤£»Ý­n¤À¨­ (  ª«¥ó¦Û¤v·|³B²z  )
       ª«¥ó¤]¤£¾A¦X¦³¤À¨­ (  ®Ä¯à§é¦©  )
so  byval object ½sĶ¾¹¶ÇªºÁÙ¬O¥»´L