Чтобы получить текущий год в Visual Basic, вы можете использовать различные методы. Вот несколько примеров:

Метод 1: использование DateTime.Now.Year

Dim currentYear As Integer = DateTime.Now.Year
Console.WriteLine("Current year: " & currentYear)

Метод 2: использование Date.Today.Year

Dim currentYear As Integer = Date.Today.Year
Console.WriteLine("Current year: " & currentYear)

Метод 3. Использование функции «Год» с определенной датой

Dim currentDate As DateTime = DateTime.Parse("2024-03-04")
Dim currentYear As Integer = Year(currentDate)
Console.WriteLine("Current year: " & currentYear)

Метод 4. Использование свойства Now класса Date

Dim currentYear As Integer = Date.Now.Year
Console.WriteLine("Current year: " & currentYear)

Метод 5. Использование свойства Now модуля Microsoft.VisualBasic.DateAndTime

Dim currentYear As Integer = Microsoft.VisualBasic.DateAndTime.Now.Year
Console.WriteLine("Current year: " & currentYear)

Метод 6. Использование класса Calendar

Dim currentYear As Integer = New System.Globalization.Calendar().GetYear(DateTime.Now)
Console.WriteLine("Current year: " & currentYear)

Метод 7. Использование свойства Year элемента управления DateTimePicker

Dim currentYear As Integer = DateTimePicker1.Value.Year
Console.WriteLine("Current year: " & currentYear)

Это всего лишь несколько способов получить текущий год в Visual Basic. Вы можете выбрать тот, который лучше всего соответствует вашим потребностям.