爲什麼這個奇怪的VB.net行爲允許分配給一個函數？

Question

我的VB.net代碼這個片段中，我試圖弄清楚爲什麼它是合法的：

Class Program 
    Public Shared Sub Main(args As String()) 

     Console.WriteLine(New wtf().TestCrazyAssignment()) 
     Console.ReadKey() 

    End Sub 

    Class wtf 
     Public recurse As int32 = 0 
     Public Function TestCrazyAssignment() As string 
      TestCrazyAssignment = "this should not be possible." 

      'BadAllocation = "something" 'compiler error - did not define with Dim 

      recurse = recurse + 1 

      Console.WriteLine(TestCrazyAssignment) 

      If recurse < 10 Then 
       TestCrazyAssignment() 
      End If 

      Return "umm.... ok." 
     End Function 
    End Class 
End Class 

輸出：

this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
this should not be possible. 
umm.... ok. 

在我簡單的例子，我要防止無限遞歸，但你明白了。

有沒有人對此有所瞭解？我最近在生產代碼中打了這個。

Answer 1

這是設置函數返回值的傳統VB方法。 VB使一個未聲明的本地變量可用，它與函數名稱相同。 我強烈建議不要這樣做，而是使用顯式返回語句。

（如果您不通過標準的「返回」退出，則未聲明的變量中的值將自動返回）。