基础问题

Question

各位大侠:
   在定义Sub(过程)或者Function(函数)时:  前面不加修饰符比如：
    Sub add()
    end sub
  它默认是Public还是Private 还是Static ??
请详细些  谢谢

Answer 1

在bas中是Public
你自己可以测试。bas:Sub a(s As String)
Debug.Print s
End SubForm1:
Private Sub Form_Load()
   Call a("I loveu")
End Sub

Answer 2

'bas:Function a(s As String) As String
Debug.Print s
a = s
End Function'Form1:Private Sub Form_Load()
Dim b As String  b = a("I love u")
   Debug.Print "b="; b
End Sub