Handle no as-clause.

src/EditorFeatures/Next/NavigateTo/Dev15NavigateToHostVersionService.Dev15ItemDisplayFactory.cs

@@ -3,6 +3,7 @@
 using System;
 using System.Collections.Generic;
 using System.Drawing;
+using System.Linq;
 using Microsoft.CodeAnalysis.Editor.Implementation.NavigateTo;
 using Microsoft.CodeAnalysis.Editor.Shared.Extensions;
 using Microsoft.CodeAnalysis.NavigateTo;
@@ -40,7 +41,10 @@ public IReadOnlyList<Span> GetAdditionalInformationMatchRuns(string searchValue)
                 => SpecializedCollections.EmptyReadOnlyList<Span>();
 
             public IReadOnlyList<Span> GetNameMatchRuns(string searchValue)
-                => SearchResult.NameMatchSpans.NullToEmpty().SelectAsArray(ts => ts.ToSpan());
+            {
+                var result = SearchResult.NameMatchSpans.NullToEmpty().Select(ts => ts.ToSpan()).ToList();
+                return result;
+            }
         }
     }
 }
\ No newline at end of file

src/EditorFeatures/Next/NavigateTo/Dev15NavigateToHostVersionService.cs

 // Copyright (c) Microsoft.  All Rights Reserved.  Licensed under the Apache License, Version 2.0.  See License.txt in the project root for license information.
 
+using System.ComponentModel.Composition;
 using Microsoft.CodeAnalysis.Editor.Implementation.NavigateTo;
 using Microsoft.VisualStudio.Language.NavigateTo.Interfaces;
 
@@ -8,6 +9,11 @@ namespace Microsoft.CodeAnalysis.Editor.NavigateTo
     [ExportVersionSpecific(typeof(INavigateToHostVersionService), VisualStudioVersion.Dev15)]
     internal partial class Dev15NavigateToHostVersionService : INavigateToHostVersionService
     {
+        [ImportingConstructor]
+        public Dev15NavigateToHostVersionService()
+        {
+        }
+
         public bool GetSearchCurrentDocument(INavigateToOptions options)
         {
             var options2 = options as INavigateToOptions2;

src/Workspaces/VisualBasic/Portable/LanguageServices/VisualBasicSyntaxFactsService.vb

@@ -1069,7 +1069,15 @@ Namespace Microsoft.CodeAnalysis.VisualBasic
                     builder.Append(", ")
                 End If
 
-                AppendTokens(parameter.AsClause.Type, builder)
+                For Each modifier In parameter.Modifiers
+                    builder.Append(modifier.Text)
+                    builder.Append(" "c)
+                Next
+
+                If parameter.AsClause?.Type IsNot Nothing Then
+                    AppendTokens(parameter.AsClause.Type, builder)
+                End If
+
                 First = False
             Next
         End Sub