Remove VB test

src/NetAnalyzers/UnitTests/Microsoft.NetCore.Analyzers/Runtime/DisposableFieldsShouldBeDisposedTests.cs

@@ -3737,88 +3737,6 @@ public async ValueTask DisposeAsync()
 }
 "
             }.RunAsync();
-
-            // How to fix: "error BC36945: The 'Async' modifier can only be used on Subs, or on Functions that return Task or Task(Of T)."?
-            /*
- 
-            await new VerifyVB.Test
-            {
-                ReferenceAssemblies = AdditionalMetadataReferences.DefaultWithAsyncInterfaces,
-                TestCode = @"
-Imports System
-Imports System.Threading.Tasks
-
-Class A
-    Implements IAsyncDisposable
-
-    Public Function DisposeAsync() As ValueTask Implements IAsyncDisposable.DisposeAsync
-        Return Nothing
-    End Function
-End Class
-
-' No diagnostic for DisposeCoreAsync.
-Class B
-    Implements IAsyncDisposable
-
-    Private ReadOnly disposedValueLock As Object = New Object()
-    Private disposedValue As Boolean
-    Private ReadOnly a As A
-
-    Public Sub New()
-        a = New A()
-    End Sub
-
-    Protected Overridable Async Function DisposeCoreAsync() As ValueTask
-        SyncLock disposedValueLock
-
-            If disposedValue Then
-                Return
-            End If
-
-            disposedValue = True
-        End SyncLock
-
-        Await a.DisposeAsync().ConfigureAwait(False)
-    End Function
-
-    Public Async Function DisposeAsync() As ValueTask Implements IAsyncDisposable.DisposeAsync
-        Await DisposeCoreAsync.ConfigureAwait(false)
-        GC.SuppressFinalize(Me)
-    End Function
-End Class
-
-' No diagnostic for DisposeAsyncCore.
-Class C
-    Implements IAsyncDisposable
-
-    Private ReadOnly disposedValueLock As Object = New Object()
-    Private disposedValue As Boolean
-    Private ReadOnly a As A
-
-    Public Sub New()
-        a = New A()
-    End Sub
-
-    Protected Overridable Async Function DisposeAsyncCore() As ValueTask
-        SyncLock disposedValueLock
-
-            If disposedValue Then
-                Return
-            End If
-
-            disposedValue = True
-        End SyncLock
-
-        Await a.DisposeAsync().ConfigureAwait(False)
-    End Function
-
-    Public Function DisposeAsync() As ValueTask Implements IAsyncDisposable.DisposeAsync
-        Await DisposeAsyncCore.ConfigureAwait(false)
-        GC.SuppressFinalize(Me)
-    End Function
-End Class"
-            }.RunAsync();
-            */
         }
 
         [Fact, WorkItem(5099, "https://github.com/dotnet/roslyn-analyzers/issues/5099")]