From 5a358a39ed618d79c4a34c7d3b3f4039c4773976 Mon Sep 17 00:00:00 2001
From: Michael Bowen <mikee.bowen@gmail.com>
Date: Tue, 2 Jan 2024 13:32:41 -0800
Subject: [PATCH] fix vb syntax error

---
 samples/spreadsheet/insert_a_chartto/vb/Program.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/samples/spreadsheet/insert_a_chartto/vb/Program.vb b/samples/spreadsheet/insert_a_chartto/vb/Program.vb
index ea2e48aa..3befa45a 100644
--- a/samples/spreadsheet/insert_a_chartto/vb/Program.vb
+++ b/samples/spreadsheet/insert_a_chartto/vb/Program.vb
@@ -21,7 +21,7 @@ Module MyModule
         Using document As SpreadsheetDocument = SpreadsheetDocument.Open(docName, True)
 
             ' <Snippet1>
-            Dim sheets As IEnumerable(Of Sheet) = document.WorkbookPart.Workbook.Descendants(Of Sheet)() _.Where(Function(s) s.Name = worksheetName)
+            Dim sheets As IEnumerable(Of Sheet) = document.WorkbookPart.Workbook.Descendants(Of Sheet)().Where(Function(s) s.Name = worksheetName)
 
             If sheets.Count() = 0 Then
                 ' The specified worksheet does not exist.