索引无参数函数的返回值

Question

我最近在编写一些 vb.net 代码时遇到了我认为相当晦涩的语言功能。

特点是，如果你调用的函数没有接收到任何参数，而你试图用参数调用它（并且期望看到一个错误出现，或者至少得到一个编译时错误！ )，它将被隐式转换为尝试索引函数的返回值。

以下代码示例来自在 Visual Studio 中创建的新 vb.net 表单项目。

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load

        Call GetCaption()


        Me.Text = GetCaption() ' The caption of the form is 'this is my new form'

        Me.Text = GetCaption(1) ' The caption of the form is 'h'

        Me.Text = GetString(2) 'The caption of the form is '2'
    End Sub

    Private Function GetCaption() As String
        Return "This is my new form"
    End Function

    Private Function GetString() As String()

        Dim x As String() = {"", "0", "2"}

        Return x

    End Function
End Class

我发现以下文档提到“如果没有参数，您可以选择省略括号。但是，使用括号使您的代码更易于阅读。可在此处获取：https://msdn.microsoft.com/en-gb/library/1wey3ak2.aspx

我还找到了有关当您尝试使用具有无法在此处索引的返回类型的函数时收到的错误的文档：https://msdn.microsoft.com/en-us/library/y1wwy0we(v=vs.140).aspx

但是，我找不到任何讨论此功能的文档，或者提到隐式转换为索引函数返回的文档，而不是尝试将参数传递给不接收任何参数的函数。

有什么想法吗？

Answer 1

您没有使用参数调用它。编译器知道该方法不接受参数，因此它不会尝试这样传递它。 GetCaption() 的返回是一个字符串，而一个字符串是一个可以被索引的字符数组，因此代码从返回的字符串中获取第 N 个字符。等效的方法是：

Me.Text = GetCaption(1)   ' second char, arrays are zero based
Me.Text = GetCaption.Chars(1)   
Me.Text = GetCaption.ElementsAt(1)

那些实现了能够省略函数括号的VB-ism；包含它们可以更清楚地表明代码实际上是在索引返回值：

Me.Text = GetCaption()(1) 
Me.Text = GetCaption().Chars(1)   
Me.Text = GetCaption().ElementsAt(1)

最后，标题是正确的：代码正在索引返回值。没有错误，因为字符串可以被索引。