GetObjectInfo方法示例
2015-12-15 22:24:37 来源: 评论:0 点击:
对于
对象MyTimer 和MyTimer1的开始时间和间隔,下列示例获得一个由值构成的二维数组。Dim iSched As Object Dim Objects(1) As String Dim Properties(1) As String Dim Objinfo As Variant O
对于 对象MyTimer 和MyTimer1的开始时间和间隔,下列示例获得一个由值构成的二维数组。
Dim iSched As Object
Dim Objects(1) As String
Dim Properties(1) As String
Dim Objinfo As Variant
Objects(0) = "MyTimer"
Objects(1) = "MyTimer1"
Properties(0) = "StartTime"
Properties(1) = "Interval"
Set iSched = System.FindObject("TestSchedule")
objinfo = iSched.GetObjectInfo(objects, properties)