參數在班在VBA

Question

初始化下午好，

我不知道是否有可能，在VBA語言，傳遞參數給它一類的初始化時間，因爲在這樣的面嚮對象語言完成作爲Java，您可以在其中創建參數化的構造函數。 「Class_Initialize（）」事件不允許我輸入參數。我怎麼解決這個問題？

一切順利。

Answer 1

使你自己的環繞？

Sub new_myClass(str1 as String, int1 as Integer) As myClass 
    Dim mc As myClass 
    mc.int_attribute = int1 
    mc.str_attribute = str1 
    '... 
    return mc 
End Sub 

Answer 2

最接近的選擇是工廠模式;

public function CreateMyClass(i as integer, str as string) As cMyClass 
    Set CreateMyClass = New cMyClass 
    '// a method within class to accept constructor-like args; 
    CreateMyClass.ctor i, str 
    '// alternatively setup via properties 
end function 

... 

dim myClass As cMyClass 
set myClass = CreateMyClass(123, "Hello")