Ultimo domingo del mes pasado en VB
Publicado por Ariana Bordon (6 intervenciones) el 13/08/2020 20:35:05
Hola! Debo sacar el ultimo domingo del mes pasado y contar cuantos dias han transcurrido desde entonces hasta la fecha actual. Tengo este codigo donde pude sacar el ultimo dia del mes, ¿que podría modificar?
1
2
3
4
5
6
7
8
9
10
11
12
Sub Main(args As String())
Dim dtmFecha As Date = Now
Console.WriteLine("El resultado es: " & UltimoDiaDelMes(dtmFecha))
End Sub
Function UltimoDiaDelMes(ByVal dtmFecha As Date) As Date
UltimoDiaDelMes = DateSerial(Year(dtmFecha), Month(dtmFecha) + 1, 0)
End Function
Valora esta pregunta
![Me gusta: Está pregunta es útil y esta clara Me gusta: Está pregunta es útil y esta clara](/img/img.png?11.51)
![NO me gusta: Está pregunta no esta clara o no es útil No me gusta: Está pregunta no esta clara o no es útil](/img/img.png?11.51)
0