title: Overload constructors in VBScript
body: <p>I found a way to extend classes in VBScript, but are there any ways to pass in parameters or overload the constructor?  I am currently using an Init function to initialize the properties, but would like to be able to do this when I create the object.<br>
  This is my sample class:</p>
  
  <pre><code>Class Test
      Private strText
  
      Public Property Get Text
          Text = strText
      End Property
  
      Public Property Let Text(strIn)
          strText = strIn
      End Property
  
      Private Sub Class_Initialize()  
          Init
      End Sub  
  
      Private Sub Class_Terminate()   
  
      End Sub 
  
      Private Function Init
          strText = "Start Text"
      End Function    
  End Class
  </code></pre>
  
  <p>And I create it </p>
  
  <pre><code>Set objTest = New Test
  </code></pre>
  
  <p>But would like to do something like this</p>
  
  <pre><code>Set objTest = New Test(strInitText)
  </code></pre>
  
  <p>Is this possible, or does the object have to be created and initialized in two setps?</p>