公有和私有

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

最后可将定义好的类模块导出，需要使用时在倒入