.NET 4.x Конвертировать код в VB.Net - Visual Basic .NET

Формулировка задачи:

Мне нужна часть кода которая написана на C#

decimal maxy = (decimal)Chart1.Series[0].Points.Max<DataPoint>(x => x.YValues[0]);

Конвертировать в VB.Net не получилось

 Dim maxy As Decimal = CDec(Chart1.Series(0).Points.Max(Of DataPoint)(Function(x) x.YValues(0)))

Выдаёт вот такую ошибку на x.YValues(0):

Значение типа "Double" невозможно преобразовать в "DataPoint"

Прошу помощи, что не так, если можно разъяснить.

Решение задачи: «.NET 4.x Конвертировать код в VB.Net»

textual
                            Листинг программы 
                        
                            Dim maxy As Decimal = CDec(Chart1.Series(0).Points.Max(Function(x) x.YValues(0)))