ÐÂÊÖѧVB,¶¨ÒåÉùÃ÷ÎÊÌâ--¹òÇó

Çë¸ßÊÖ°ïæ·ÖÎö¡£¡£ÒÔϹý³Ì¶¨ÒåºÏ·¨ÐÔ..ºÍΪʲô

Sub P1£¨x£©As Single

Function P1(ByVal x)

Sub PP(ByVal x£¬ByVal y)

Sub PP(x,ByVal y)

Sub PP(x,y)

Sub PP(ByVal x,y)

---

Sub P1£¨x£©As Single  Õâ¸ö²»ÄÜÓзµ»ØÖµ°É
---ÏÂÃæµÄ x y ûÓÐÀàÐÍÂð ²»ÖªµÀÕâÑùÄܲ»ÄÜÓÃ
Function P1(ByVal x) 

Sub PP(ByVal x£¬ByVal y)

Sub PP(x,ByVal y)

Sub PP(x,y)

Sub PP(ByVal x,y)

---

ÐÞ¸ÄÈçÏÂ:  PublicÉùÃ÷¹«Óã¬PrivateÉùÃ÷˽Óã¬x,yÓ¦¶¨ÒåÊý¾ÝÀàÐÍ,º¯Êý»¹¿É¶¨Òå·µ»ØÖµ¡£
Private Sub P1£¨x£©
........
End sub

Private Function P1(ByVal x As long)
...........
End function

Private Sub PP(ByVal x£¬ByVal y)
........
End sub

Private Sub PP(x,ByVal y)
........
End sub

Private Sub PP(x,y)
........
End sub

Private Sub PP(ByVal x,y)
........
End sub

---

sub ÎÞ·µ»ØÖµ£¬functionÒªÓзµ»ØÖµºÍ·µ»ØÖµÀàÐÍ¡£º¯Êý²ÎÊýÒªÓÐÀàÐÍ¡£

---

ÒýÓÃ

sub ÎÞ·µ»ØÖµ£¬functionÒªÓзµ»ØÖµºÍ·µ»ØÖµÀàÐÍ¡£º¯Êý²ÎÊýÒªÓÐÀàÐÍ¡£

Õý½â¡£

---

Sub P1£¨x£©As Single  '²»ºÏ·¨£¬¹ý³ÌÐòûÓзµ»ØÖµ£¬¹ý³Ì²»ÄÜas ....
Function P1(ByVal x)  'ºÏ·¨£¬·µ»ØÒ»¸övariantÖµ
Sub PP(ByVal x£¬ByVal y) 'ºÏ·¨
Su