VB面向对象的程序设计-初始化

初始化:
VB讨厌的地方可以说就是不能初始化。比如我上次上传的“VB 入门教程”里就很想当然的说 VB 可以用“Dim Index=3”的方法定义并初始化变量，其实却是不可以的。对于对象来说也是一样。         

在 C++ 中，构造函数可以有参数，所以可以同时初始化新产生的对象，不过 VB 不行，所以我不得不在类里定义一个名叫“初始化”的方法，然后一边咒骂，一边用以下的语法初始化（“:=”是命名参数，具体参见帮助）：         

    Set 麦克 = New 狼        
    麦克.初始化 身高:=100, 体重:=100        

最近我忽然想到，VB 的普通数据可能真的不能初始化，只能用“Dim x As Long: x=100”这样可恶的语法，但是“对象”却是可以初始化，而且这应该是一种耳熟能详的方法，比较奇怪的是为什么以前没有想到：         

Private Sub Class_Initialize()        
    RaiseEvent 初始化(体重, 身高)        
End Sub        

不过实际的测试却非常失败，在“Class_Initialize”事件发生时确实可以做一定的操作，不过“RaiseEvent”不在其中，想必是因为在“Class_Initialize”事件发生时还没有任何定义，包括“事件”，所以“RaiseEvent”也只成了一种空操作，也许可以用一些比较复杂的方法等它有效，不过我们这样做也只是为了简单，用复杂的方法实现简单实在是不可想象，所以还是用“初始化”“方法”好了（我用的是 VB5 ，建议使用 VB6 的同志们亲自试一试，如果可行，还是很好的），建议遇到这种情况时要一刻不停的咒骂微软，咒骂 VB 开发组。:)