Vb6 在visualbasic中命名可选参数

在VisualBasic中，我有很多带有可选参数的函数。我希望能够将这些可选参数中的一小部分传递给函数，而不必使用大量的逗号和空格来获得所需的参数。在某个地方，我看到了一种命名参数的方法，例如

OptVar:=val

，但这似乎不起作用。只是想知道是否有办法做到这一点。这将有助于提高可读性

Function foo(Optional val1 = 1, Optional val2 = 2, Optional val3 = 3) 
End Function

要将

foo

仅与所需的最后一个参数一起使用，如下所示：

fud = foo( , , 4)

有点笨重。如果这样的构造能起作用，那就更好了：

fud = foo(val3:=4)

但这是行不通的

这确实有效：

Function foo(Optional val1 = 1, Optional val2 = 2, Optional val3 = 3)
    MsgBox "val1: " & val1 & " val2: " & val2 & " val3: " & val3
    foo = val3
End Function


Private Sub Form_Load()
    MsgBox "foo returned: " & foo(val3:=4)
End Sub

---

第一个消息框的输出是“val1:1 val2:2 val3:4”，第二个消息框返回foo:4

如果您提供了一些您尝试过的代码，那么给出答案就更容易了。函数foo（可选val1=1，可选val2=2，可选val3=3）。。。使用foo只需要最后一个参数的End函数如下：fud=foo（，4）有点不合适。如果这样的构造可以工作，那就更好了：fud=foo（val3:=4）。但这是行不通的。如果像这样的事情能奏效那就太好了！谢谢。已经有一段时间了，看来没人能找到解决办法。谢谢你的努力。