Home » Archives for abril 2014

Encontrar el mayor numero Visual Basic 6.0

in , , , , , , , , , , - on 10:31 p.m. - No comments
El siguiente programa permite al usuario insertar tres numeros para calcular cual es el mayor. En un cuarto input se imprimira el mayor de los tres.


El codigo es el siguiente:

Private Sub cmdcalcular_Click()

If Val(txt1.Text) > Val(txt2.Text) And Val(txt1.Text) > Val(txt3.Text) Then

txtresultado.Text = txt1.Text

Else

If Val(txt2.Text) > Val(txt3.Text) Then

txtresultado.Text = txt2.Text

Else

txtresultado.Text = txt3.Text

End If

End If


End Sub



Foto D126 by miobi


Read more
Etiquetas: , , , , , , , , , ,

PHP: Calcular cuantos dias faltan para tu cumpleaños

in , , , , - on 3:49 p.m. - 2 comments
Al insertar el mes el dia y el ano de tu proximo cumpleanos el programa te dira cuantos dias restan para esta fecha.

<!DOCTYPE html>
<html>
<head>
  <title>PHP: Dias para tu cimpleanos</title>
  </head>
  <body>
  
 <?php
if (isset($_POST['mes'], $_POST['dia'], $_POST['anio']) == true) {
    
    $mes  = $_POST['mes'];
    $dia  = $_POST['dia'];
    $anio = $_POST['anio'];
    
    if (empty($mes) || empty($dia) || empty($anio)) {
        echo '<strong> * Todos los campos son necesarios </strong>';
    } else {
        
        
        $t_dias   = mktime(0, 0, 0, $mes, $dia, $anio);
        $hoy      = time();
        $dif_dias = ($t_dias - $hoy);
        $dias     = (int) ($dif_dias / 86400);
        print "Dias que faltan para tu cumplea&ntilde;os: 
<strong > $dias </strong> dias";
        
    }
    
}
?>

 <h3> Escribe tu fecha de cumplea&ntilde;os </h3>
<form method="POST" action="">
Mes <br />
<input type="text" name="mes" /> <br />
Dia <br />
<input type="text" name="dia" /> <br />
A&ntilde;o <br />
<input type="text" name="anio" /> <br />
<input type="submit" name="calcular">
</form> 

 </body>
<html>






Read more
Etiquetas: , , , ,