使用VBScript从函数返回值

Question

我是vbscript的新手。我试图从下面的PingTest函数获取返回值，但它在函数定义中给出了一个错误（我使用的是Windows 10）。

All Records

199
13

200
61

Answer 1

在

中指定函数的返回类型

Function PingTest( hostName ) as Boolean

是illegal in VBscript。

第二个想法：

键入Dims - 如

Dim output As Boolean = PingTest("www.google.com")

也不是VBScript。并将对象分配到colPingResults需要Set。