Parameters in Class

[danasegarane]

Hi all,
Can we pass arguments in the Class Intialise Event(Dll Creation) ?

[Joacim Andersson]

Nope VB6 (and earlier versions) doesn't have any constructor method that can be overwritten. You'll have to create your own Init method that can be called directly after the object is created.

[danasegarane]

Any simple Example ?

[Joacim Andersson]

In your class module simply add a public Sub or Function like this:

Public Sub Init(ByVal arg1 As Long, ByVal arg2 As String)
    'do whatever
End Sub

You'll then have to call the Init method:

Dim obj As MyClassName
Set obj = New MyClassName
Call obj.Init(27, "Some string")

[Hack]

Congratulations on 10K Joacim!

As mentioned, you can't pass arguments to the Initialize event, but another possibility to create your own public method and pass it parameters.

Example:

Set myObj = New Class1
Call myObj(Parameter)

[techgnome]

Hack - double check your coding there.... That should generate a syntax error....
Might find this works better:

Call myObj.InitThis(Parameter)

-tg

[Thraka]

the VBCorlib library uses the technique of creating a method named NewClassName which returns the new instance..

Dim o As MyClass: Set o = NewMyClass(10, 22)

Public Function NewMyClass(ByVal X As Integer, ByVal Y As Integer)
    Set NewMyClass = new MyClass
    MyClass.X = X
    MyClass.Y = Y
End Function

I've adopted this into my own projects.