公有和私有
Private 私有的 Public公有的
定义为私有后不可以被其他模块调用，默认是公有
此时的i无法被调用，因为时定义在另一个模块内部
将i定义到外部后就可调用
不过以上针对的时同一个模块里的
要在不同的模块中引用i在外部定义为 Public i 即可
若要跨模块使用，还是利用函数调用好
类模块
可以将多个写的过程合并
定义一个类变量并命名为super
将模块1的代码复制到类模块中后，模块1的代码可以删除
此时，在模块1中定义a对象后，a对象便可直接引用del和add两个方法
Sub r()
'注意写法'
Dim a As New super
a.add "er"
End Sub
也可定义属性
Property Get scount()
scount = Sheets.Count
End Property
