如何访问VBScript类内部的对象参数？

Question

我已经习惯了面向对象（OO），试图让非对象去做面向对象的事情让我很头疼...

在VBScript中使用以下方法初始化对象时：

 Dim ChartData: Set ChartData = (New ChartDataClass)("progress", "default")   
        With ChartData
            .ColorScheme        = "default"
            .Essential          = 10                    ' outer range1
            .Lifestyle          = 10     

我可以通过以下方式查看.Essential等的值：

   Dim ChartDetails:  Set ChartDetails = ChartDict.Item("Chart1")
    Dim ThisChart
    For Each strKey In ChartDict
        Set ThisChart = ChartDict(strKey)
        Response.Write("<br><br><hr>" + CStr(ThisChart.Essential) + " | " + CStr(ThisChart.Lifestyle) + " | " + CStr(ThisChart.Discretionary) + " | " + CStr(ThisChart.Heading1Text))
        Response.Write ("<br />")
    Next    

我的问题是，初始化对象后，我无法从类中看到.Essential的值：

在我的课堂上，我宣布了Public Essential。但是，似乎有些棘手的Get / Set东西我似乎都不见了（并试图避免）。

如何在不使用VBScript创建大量构造函数参数的情况下访问实例化参数？