请帮我讲一下这段vbscript的含义？

Question

本帖最后由 bcrun 于 2011-07-15 11:55:55 编辑

Answer 1

Sub vbld_StepStarted()'声明一个叫vbld_StepStarted的子程序Dim nI'声明变量
Dim objSteps
Dim objStep
Dim objDom
Dim objNode
Dim objNodes
Dim objAttribute
Dim sVersion
Dim sStepName
Dim bStepEnabled    Set objSteps = Application.Project.Steps(vbldStepMain)'声明一个对象集合（这里本身有错，没有指明Application对象，不过可能有其他的子程序声明了这个对象）
    
    For Each objStep In objSteps'对对象集合里的每一个元素进行操作
    
        If objStep.BuildStatus = vbldStepStatInProgress Then'如果BuildStatus属性是vbldStepStatInProgress的话
            sVersion = objStep.Property("Version")'调用Property函数，并将返回值赋给变量sVersion
            Call Application.Macros(vbldMacroTemporary).Add("STEP_VERSION", sVersion)'调用Application对象的Macros方法
            Exit For跳出循环
        End If
    
    Next
End Sub