Trabajando con fechas

01/09/2006 - 12:40 por Fadoyo | Informe spam
Hola a todos, espero que hayais tenido buen verano. ¿Es posible hacer lo
siguiente de forma facil?

Si hoy es X ( 21 de Agosto por ejemplo), quiero obtener la fecha del proximo
Lunes, ¿Como lo puedo hacer?

Gracias
Fadoyo

Preguntas similare

Leer las respuestas

#1 Jorge Serrano [MVP VB]
01/09/2006 - 13:02 | Informe spam
Hola Fadoyo,

podrías utilizar un código similar al siguiente:

Dim Hoy As New Date
Hoy = Now
Hoy = Hoy.AddDays(7)
MessageBox.Show(Hoy)

Espero que te sirva.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/

Blog de Jorge Serrano
http://geeks.ms/blogs/jorge/default.aspx


"Fadoyo" wrote:

Hola a todos, espero que hayais tenido buen verano. ¿Es posible hacer lo
siguiente de forma facil?

Si hoy es X ( 21 de Agosto por ejemplo), quiero obtener la fecha del proximo
Lunes, ¿Como lo puedo hacer?

Gracias
Fadoyo



Respuesta Responder a este mensaje
#2 Diememphis
01/09/2006 - 21:20 | Informe spam
Bueno primero comentarles que soy nuevo en el grupo y que quiero
participar de elo en todo lo posible..

Ok lo que pasa es que necesito una función que me pertmita actualizar
la fecha en mi programa. por ejemplo en visual studio 2005, quiero
saber como hacerlo, o que se hace para actualizarlo en SQL server 2005
.. gracias...

Suerte
Respuesta Responder a este mensaje
#3 Jesús López
02/09/2006 - 14:26 | Informe spam
Jorge. Eso no es lo que están pidiendo


"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
Hola Fadoyo,

podrías utilizar un código similar al siguiente:

Dim Hoy As New Date
Hoy = Now
Hoy = Hoy.AddDays(7)
MessageBox.Show(Hoy)

Espero que te sirva.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/

Blog de Jorge Serrano
http://geeks.ms/blogs/jorge/default.aspx


"Fadoyo" wrote:

Hola a todos, espero que hayais tenido buen verano. ¿Es posible hacer lo
siguiente de forma facil?

Si hoy es X ( 21 de Agosto por ejemplo), quiero obtener la fecha del
proximo
Lunes, ¿Como lo puedo hacer?

Gracias
Fadoyo



Respuesta Responder a este mensaje
#4 Jesús López
02/09/2006 - 14:28 | Informe spam
Dim Today As Date = Date.Today
Dim DaysToAdd As Integer = 7 + CInt(DayOfWeek.Monday) -
CInt(Today.DayOfWeek)
If DaysToAdd > 7 Then DaysToAdd -= 7
Dim NextMonday As Date = Today.AddDays(DaysToAdd)
MsgBox( NextMonday)

Saludos:

Jesús López



"Fadoyo" escribió en el mensaje
news:
Hola a todos, espero que hayais tenido buen verano. ¿Es posible hacer lo
siguiente de forma facil?

Si hoy es X ( 21 de Agosto por ejemplo), quiero obtener la fecha del
proximo
Lunes, ¿Como lo puedo hacer?

Gracias
Fadoyo


Respuesta Responder a este mensaje
#5 Jorge Serrano [MVP VB]
02/09/2006 - 17:38 | Informe spam
Hola Jesús, muchas gracias por la rectificación.

Tienes toda la razón... con las prisas...

Bueno, aquí va otro intento. :-)


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim Hoy As New Date
Hoy = Hoy.ToShortDateString
If Not Hoy.DayOfWeek = DayOfWeek.Monday Then
Dim valor = Hoy.DayOfWeek
If valor = 0 Then valor = 7
Hoy = Hoy.AddDays((7 - valor) + 1)
End If
MessageBox.Show(Hoy)
End Sub


Un saludo.

Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Blog de Jorge Serrano
http://geeks.ms/blogs/jorge/default.aspx


"Jesús López" wrote:

Jorge. Eso no es lo que están pidiendo


"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
> Hola Fadoyo,
>
> podrías utilizar un código similar al siguiente:
>
> Dim Hoy As New Date
> Hoy = Now
> Hoy = Hoy.AddDays(7)
> MessageBox.Show(Hoy)
>
> Espero que te sirva.
>
> Jorge Serrano Pérez
> Microsoft MVP VB.NET
> PortalVB.com
> http://www.portalvb.com/
>
> Blog de Jorge Serrano
> http://geeks.ms/blogs/jorge/default.aspx
>
>
> "Fadoyo" wrote:
>
>> Hola a todos, espero que hayais tenido buen verano. ¿Es posible hacer lo
>> siguiente de forma facil?
>>
>> Si hoy es X ( 21 de Agosto por ejemplo), quiero obtener la fecha del
>> proximo
>> Lunes, ¿Como lo puedo hacer?
>>
>> Gracias
>> Fadoyo
>>
>>
>>



Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida