Skip to main content
Corrección de ortografía, indentación o formato
Origen Enlace
Riaven
  • 3.4k
  • 6
  • 17
  • 32

ultimo Último domingo del mes pasado en vb

tengoTengo este código donde saco el ultimoúltimo día del mes, pero necesito saber que le falta para sacar el ultimoúltimo domingo del mes pasado y cuantos días han transcurrido desde entonces

Sub Main(args As String()) ''el ultimo domingo fue el 26/07:

    Sub Main(args As String())
        ''el ultimo domingo fue el 26/07

        **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**

ultimo domingo del mes pasado en vb

tengo este código donde saco el ultimo día del mes, pero necesito saber que le falta para sacar el ultimo domingo del mes pasado y cuantos días han transcurrido desde entonces

Sub Main(args As String()) ''el ultimo domingo fue el 26/07

    **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**

Último domingo del mes pasado en vb

Tengo este código donde saco el último día del mes, pero necesito saber que le falta para sacar el último domingo del mes pasado y cuantos días han transcurrido desde entonces:

    Sub Main(args As String())
        ''el ultimo domingo fue el 26/07

        **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**
Origen Enlace
ari127
  • 325
  • 1
  • 11

ultimo domingo del mes pasado en vb

tengo este código donde saco el ultimo día del mes, pero necesito saber que le falta para sacar el ultimo domingo del mes pasado y cuantos días han transcurrido desde entonces

Sub Main(args As String()) ''el ultimo domingo fue el 26/07

    **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**