VB面向对象编程

都说VB不能面向对象编程，花了点时间，基本实现了重载，继承，超越，VB不支持直接重载，所以不能重写VB的构造函数，所以用一个Init过程代替了，这就是说，如果需要特殊的构造，则需要调用此过程，VB支持友元，这里没有演示；不支持Protect,这里算勉强实现了吧，不多说，参见代码吧