Formato Data de inicio e fim do Mês

[jafm]

Boas,

Alguém me consegue ajudar a desvendar o formato da data.

txtData.Text = Today.ToString("ddMMyy")

Com o código a cima vou buscar a data de hoje naquele formato.

Agora existe a necessidade de ir buscar a data de inicio e fim de cada Mês, ou seja, quero ir buscar o mês de janeiro, fevereiro e por ai fora.

Como é que consigo tratar a data?

Edited August 5, 2013 at 06:40 PM by thoga31
GeSHi

[nelsonr]

Boas,

podes criar uma data no primeiro dia do mes seguinte, e subtrair 1 dia, para obteres o ultimo dia do mes.

Algo assim:

Dim primeiroDiaJaneiro as DateTime  = New DateTime(2013, 1, 1)
Dim ultimoDiaJaneiro as DateTime  = New DateTime(2013, 2, 1).AddDays(-1)

Podes usar o ToString nessas variaveis depois para formatares como quiseres

Edited August 5, 2013 at 06:41 PM by thoga31
Tags CODE + GeSHi

[jafm]

È mesmo isso que precisava Nelson, só falta um pormenor que é como colocar o 2013 automático. indo buscar ao PC

[nelsonr]

Podes fazer algo do tipo:

Dim ano As Integer = Today.Year
Dim primeiroDiaJaneiro As DateTime = New DateTime(ano, 1, 1)
Dim ultimoDiaJaneiro As DateTime = New DateTime(ano, 2, 1).AddDays(-1)

[jafm]

Muito Obrigado pela ajuda.