- ©«¤l
- 7
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 11
- ÂI¦W
- 0
- §@·~¨t²Î
- winxp
- ³nÅ骩¥»
- visual studio 2008
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-6-26
- ³Ì«áµn¿ý
- 2015-11-11
|
[µo°Ý] ¶ÇÈ©I¥s(Call By Value)
¤U¦C¬O¥Îcall By Valueªºµ{¦¡½X¡AÅã¥Üªº¼ÆÈ¬O10¡A§Ú·Q½Ð°Ý¤@¤U¦U¦ì´N¬Oa¨S¦³«Å§i,¨ºa¬Oxªº½Æ»sȶܡHsub¨ºÃ䤣¤Ó¤F¸Ñ¡H§Æ±æ¦³¥ý¶i¸ÑÄÀ¤@¤U
Module Module1
Sub Main()
Dim x As Integer = 10
Call Square(x)
Console.WriteLine(x)
Console.ReadKey()
End Sub
Sub Square(ByVal a As Integer)
a = a ^ 2
End Sub
End Module |
|