Получить первый и последний день месяца на основе combobox

Question

Мой вопрос в том, как получить первый и последний день месяца в текстовые поля на основе поля со списком.

Например, у меня есть поля типа «Декабрь-2016», «Январь-2017», если я выберу «Декабрь-2016», я хочу получить «01/12/2016» «31/12/2016 "

Спасибо заранее.

Answer 1

Это даст вам обе даты. Просто замените статическую дату, которую я использовал с вашим значением combobox.

Dim dt As Date 
If Date.TryParse("December-2016", dt) Then 
    Dim startDt As New Date(dt.Year, dt.Month, 1) 
    Dim endDt As New Date(dt.Year, dt.Month, Date.DaysInMonth(dt.Year, dt.Month)) 
End If