Foro de elhacker.net

Tengo una duda

Yo Tengo Un Combo Box Con Lo Siguiente

If Combo1.Text = "Sencilla" Then
precio = 5500
 
ElseIf Combo1.Text = "Doble" Then
precio = 4200
 
ElseIf Combo1.Text = "Triple" Then
precio = 3300

  Y Un Label Que dice reservaciones  con dos DTPickers   ahora yo quiero saber como hago lo de reservaciones  ejemplo si yo me registro el 6/8/15 y pienso quedarme  hasta  11/8/15  yo quiero que  suma los dias que yo me eh quedado  segun el tipo de habitacion lo cual son(Sencilla,Doble,Triple)

creo que es dtpicker1.value=


ejemplo si yo elijo Sencilla ($5,500) y pienso quedarme dos dias  quiero que suma los dias   primerdia: $5,500  segundoDia:$5,500    =        $11,000 * habitantes

Esta vez vas a tener que pensar mas :D
Cuando entras al hotel guardas la fecha en una variable mirando el valor del DTPcker ese.
Cuando sales comparas la fecha actual con la guardada.
Para compararla te puede servir el comando datediff. Investiga un poco. Usa "San Google" :D

Saludos

Gracias por contestar

llevo casi 45 min en esto y todavia no se que estoy haciendo

Dim Date1 as interger
dim date 2 as interger

Modificando Un Poco Mas: DateDiff("d", #1/1/2015#, #1/12/2015#)

Actualizando Mas: Dias = DateDiff(dateinterval.Day, DTPicker1.Value, DTPicker2.Value, Now.Date) & "dias"

Pues es bastante simple, pero tienes que usar variables de tipo Date o al menos de tipo String para guardar el valor.

  Dim Dia1 As String
  Dia1 = "06/06/2015" ' fecha de entrada guardada
  MsgBox DateDiff("d", CDate(Dia1), DTPicker1.Value)  ' diferencia con la fecha actual
 

 ;)

Saludos

Gracias Por Tu Ayuda!