'=====================================
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
'=====================================
【软件自动化测试 - VBScript 3】== VBScript中的类
最新推荐文章于 2024-09-11 15:29:37 发布