经典ASP中的VBScript

Question

我正在使用一个非常奇怪的VB版本...它不希望我告诉它什么是什么，它想要自己解决这个问题。

在C＃中，我可以很容易地对数组进行硬编码......在这个VB中没有那么多。

我想在调用函数时创建一个硬编码数组......但我不确定语法。 在这个特定的VB版本上找不到多少。 它不允许您声明类型。 这里有人知道怎么做吗？ 如果是的话，谢谢！

        FUNCTION HasInput(filters())
            HasInput = False
            FOR EACH table IN filters
                FOR EACH key IN Request.Form
                    IF LEFT(key, LEN(table)) = table AND Request.Form(key) <> "" THEN
                        HasInput = TRUE
                    END IF
                NEXT
            NEXT

        END FUNCTION

IF HasInput({"ih", "hdms"}) THEN

Answer 1

使用Array()函数：

If HasInput(Array("ih", "hdms")) Then

并收到阵列：

Function HasInput(filters)

（尽管你仍然可以使用filters()如果它更清楚你传递一个数组）