Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: leliCabello en 14 Abril 2010, 02:42 am


Título: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 02:42 am
amigos como calcular qué día será mi cumpleaños de aquí en 10 años? ayudenme xfas
aqui les dejo mi avance
Código:
2.	Qué día será mi cumpleaños de aquí en 10 años?

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 02:44 am
 ;D me confundi este es mi avance...jej
Código:
Imports System.Console
Module Module2
    Sub main()
        Title = "Calculando cumpleaños"
        ForegroundColor = ConsoleColor.Cyan

        'variables
        'Dim diac#
        Dim fecha, fecha2 As Date

        'entradas
        Write("Ingresar fecha de cumpleaños (dd/mm/aa): ") : fecha = ReadLine()

        'proceso
        fecha = DateAdd(DateInterval.Month, 12, fecha2)

        WriteLine("Cumpleaños dentro de 10 años: {0}", fecha.ToString("ddd dd/MMM/yy"))
        ReadKey()
    End Sub

End Module

Título: Re: ayuda a calcular fecha
Publicado por: Novlucker en 14 Abril 2010, 13:20 pm
dayofweek :rolleyes:

Saludos

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 16:26 pm
me parece dayofweek, no es un miembro de visual, o donde lo ubico, ayudenme xfis
Código:
Imports System.Console
Module Module2
    Sub main()
        Title = "Calculando cumpleaños"
        ForegroundColor = ConsoleColor.Cyan

        'variables
        'Dim diac#
        Dim fecha As Date

        'entradas
        Write("Ingresar fecha de cumpleaños (dd/mm/aa): ") : fecha = ReadLine()

        'proceso
        'fecha = DateAdd(DateInterval.Month, 12, fecha2)

        'WriteLine("Cumpleaños dentro de 10 años: {0}", fecha.ToString("ddd dd/MMM/yy"))
        WriteLine("Días: {0}", DateDiff(DateInterval.dayofweek, fecha, Now) * 10)
        ReadKey()

    End Sub

End Module

me bota error...

Título: Re: ayuda a calcular fecha
Publicado por: Novlucker en 14 Abril 2010, 16:37 pm
Va sobre una fecha (datetime)

:http://msdn.microsoft.com/en-us/library/system.dayofweek.aspx
Código
  1. Writeline(fecha.DayOfWeek)

Saludos

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 16:56 pm
ps mira ya puse sobre fecha, pero no me bota el dia de mi cumpleaños dentro de 10 años ... me bota otra cosa  :-[
Código:
Imports System.Console
Module Module2
    Sub main()
        Title = "Calculando cumpleaños"
        ForegroundColor = ConsoleColor.Cyan

        'variables
        'Dim diac#
        Dim fecha As Date

        'entradas
        Write("Ingresar fecha de cumpleaños (dd/mm/aa): ") : fecha = ReadLine()

        'proceso
        'fecha = DateAdd(DateInterval.Month, 12, fecha2)

        'WriteLine("Cumpleaños dentro de 10 años: {0}", fecha.ToString("ddd dd/MMM/yy"))
        'WriteLine("Días: {0}", DateDiff(DateInterval.dayofweek, fecha, Now) * 10)
        WriteLine("Dia que cae {0}: ", fecha, fecha.DayOfWeek = DayOfWeek.Thursday)
        ReadKey()

    End Sub

End Module

Título: Re: ayuda a calcular fecha
Publicado por: Novlucker en 14 Abril 2010, 16:58 pm
Te devuelve TRUE or FALSE supongo, ... tienes la más mínima idea de lo que estas haciendo? :huh:

Saludos

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 17:01 pm
NO ME DEVUELVE LA MISMA FECHA QUE INGRESE y la hora 12:00 m :huh:

Título: Re: ayuda a calcular fecha
Publicado por: Novlucker en 14 Abril 2010, 17:04 pm
Ya he visto, pero vuelvo a preguntar, sabes lo que estas haciendo?
Si tienes esto ...
Código
  1. WriteLine("Dia que cae {0}: ", fecha, fecha.DayOfWeek = DayOfWeek.Thursday)

Es lógico que solo devuelva la fecha, solo le pasas la fecha a la primera parte, y en la segunda haces una comparación (por eso lo de TRUE y FALSE)

Saludos

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 17:16 pm
si ya me di cuenta como debo hacer para que me devuelva  un dia de la semana dentro de 10 años ... ayudame porfavor :-(

Título: Re: ayuda a calcular fecha
Publicado por: Novlucker en 14 Abril 2010, 17:21 pm
Cita de: Novlucker en 14 Abril 2010, 16:37 pm
Va sobre una fecha (datetime)

:http://msdn.microsoft.com/en-us/library/system.dayofweek.aspx
Código
  1. Writeline(fecha.DayOfWeek)

Saludos

Título: Re: ayuda a calcular fecha
Publicado por: leliCabello en 14 Abril 2010, 17:24 pm
 :silbar: gracias


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines