VB6中的面向对象编程---实现类继承
确切地说VB6不能实现真正意义上的类继承（如C++中的继承），但是通过其关键字Implements也提供了类似的功能。
我们先建一个类模块CBase.cls
代码如下：
Private mvarBaseProperty As String
Public Sub BaseFunction()
MsgBox “Hello world!”
End Sub
Public Property Let BaseProperty(ByVal VData As String)
mvarBaseProperty = VData
End Property
Public Property Get BaseProperty() As String
BaseProperty = mvarBaseProperty
End Property
