Question

这个应该非常容易，但我是VB脚本的新手，由于某种原因，我无法使用子程序。我收到了错误＆＃34; VBScript编译错误＆＃34; 它指向第5行Sub add(a,b)

Language="VBSCRIPT"
Sub CATmain()

add 5, 3
Sub add (a, b)
sum=a+b
msgbox sum
End Sub

End Sub

抱歉这个简单的问题。谢谢你的时间。

Answer 1

应在任何其他子程序之外定义一个子程序或一个函数，并在需要时从主子程序调用它。

Function Add(A, B)
  Add = CInt(A) + CInt(B)
End Function
'Here Add should be a Function, not a Subroutine.

Sub CATmain()
Dim Sum
  Sum = Add(5, 3)
  'Calling Add and store its result in Sum Variable
  MsgBox "Sum: " + CStr(Sum)
End Sub

CATmain
'Calling your main Subroutine CATmain

Sub用于声明构成VB脚本中Sub过程主体的名称，参数和代码。

创建子程序（VBscript）

1 个答案: