Function VBScript:将参数传递给函数

Function VBScript:将参数传递给函数,function,vbscript,parameter-passing,Function,Vbscript,Parameter Passing,我有两个功能。我需要将一个参数从一个传递到另一个,并在第二个函数中对其求值。对于下面的代码,我需要env中的“QA”,但它会将其打印为“env” 我在您的代码中看到至少两个问题: streng=QA 您可能想将字符串“QA”分配给变量strev。但是,如果没有双qoutesQA则被视为一个变量。由于您没有对其进行初始化,因此其值为空,然后将其分配给强度 函数中条件的语法不正确。请检查一下电话号码 您发布的代码甚至没有编译(它会为无效语法生成一个“编译错误”),更不用说运行或做任何错误了。请回答您

我有两个功能。我需要将一个参数从一个传递到另一个,并在第二个函数中对其求值。对于下面的代码,我需要env中的“QA”,但它会将其打印为“env”


我在您的代码中看到至少两个问题:

  • streng=QA

    您可能想将字符串
    “QA”
    分配给变量
    strev
    。但是,如果没有双qoutes
    QA
    则被视为一个变量。由于您没有对其进行初始化,因此其值为
    ,然后将其分配给
    强度

  • 函数中条件的语法不正确。请检查一下电话号码


  • 您发布的代码甚至没有编译(它会为无效语法生成一个“编译错误”),更不用说运行或做任何错误了。请回答您的问题,以提供一个真实的、正在运行的、不适合您的代码示例。@Ken White:我已经更新了代码-1如果您确实尝试运行刚才发布的代码,您会注意到它仍然会抛出编译错误。错误消息甚至会告诉你在哪里以及为什么。我现在已经更新了代码。如何读取函数中的参数STRENTV?实际上,我是从用户输入中获得QA的。但为了方便起见,我在这里分配了它。STREV的“QA”值在函数getNumber之外。但是我如何才能在函数中获取它?@sravs448函数中的条件仍然有语法错误。我甚至让你查阅了相关文件。请删除错误恢复时的
    下一步
    你的真实代码中似乎有什么地方,然后做你的家庭作业。我可以处理条件。我现在已经更新了。请告诉我如何访问传递的参数。代码中的逻辑是正确的。不是你的语法。您仍然有一个语法错误(在示例代码的第18行)
    endif
    (不带空格)在VBScript中不是有效的关键字。
    strenv = "QA"
    cus_number = getNumber(strenv)
    
    If (IsNull(cus_number)) Then
        WScript.Echo "Number is null" 
    Else
     WScript.Echo "cus_number : " & cus_number
    End If
    
    
    
     Function getNumber(strenv)
        wscript.echo "env: " & strenv
        if strenv = "QA" Then
         number = "423"
        elseif strenv ="DEV" Then
          number= "678"
        endif
         getNumber=number
        End Function