• Domingo 22 de Diciembre de 2024, 13:53

Autor Tema:  Re: Control con fecha  (Leído 1341 veces)

Massiel

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Re: Control con fecha
« en: Viernes 31 de Mayo de 2002, 17:23 »
0
:( hola... espero me puedan ayudarme, la verdad es que tengo un grave problema porque tengo que entragar hoy el Sistema, y no he podido...Ayuda, Auxilio!!!

Mi dilema es que no se controlar bien las fechas y necesito llenar un " Combo Box", con los dias de un mes entero, pero reconociendo el dia que corresponde a la semana... en resumen el Combo Box debe quedar = Lunes 5 ... Martes 6... Miercoles 7, teniendo en cunta que eso esta trabajado dentro del mes actual.

Esperoando una pronta y rapida respuesta... de antemano muchas gracias.

Pd. Porfa help... ayudenme, auxolio, soquirio..... Ahhhaaaaaaa!!!!!!!

dheak

  • Miembro activo
  • **
  • Mensajes: 62
    • Ver Perfil
Control con fecha
« Respuesta #1 en: Viernes 31 de Mayo de 2002, 23:17 »
0
je je, bueno, una forma de hacerlo es simplemente si sabes el dia 1 que dia es, poz ya ta.

Suponiendo que es junio...

sub IntroducirDia(dia as integer)
 eseldia = dia mod 7
 select case dia
  case 0:
   cadena = "sabado " & dia
  case 1:
   cadena = "domingo " & dia
  case 2:
   cadena = "lunes " & dia
  case 3:
   cadena = "martes " & dia
  ...
  case 6:
   cadena = "viernes " & dia
 end select
 form1.combo1.additem cadena
end sub

El metodo es burrisimo pero pa sacarnos de algun apurillo. Ale, saludos chata.