【软件自动化测试 - VBScript 3】== VBScript中的类

'=====================================
Class c
        Public a1
        Public a2
        Public Sub  s()
                a1=1
                a2=2
        EndSub
End Class

Dim c1
Set c1=New c

Dim temp1,temp2
c1.s
temp1=c1.a1
temp2=c1.a2
MsgBox temp1
MsgBox temp2
'=====================================