Class Constructor Parameters

'VBScript
 Class Person
     Private m_Age
     Private m_Name

     Public Default Function Init(Name, Age)
         m_Name = Name
         m_Age = Age

         Set Init = Me
     End Function

     Public Property Get Name
         Name = m_Name
     End Property
     Public Property Let Name(v)
         m_Name = v
     End Property

     Public Property Get Age
         Age = m_Age
     End Property
     Public Property Let Age(v)
         m_Age = v
     End Property
 End Class

 Dim TheDude : Set TheDude = (New Person)("John",40)