Nuevo concurso para España, Argentina, Brasil, Chile, Colombia, Ecuador, México, Perú y Portugal.
|
Visual Basic Script, tutorial en español
Visual Basic Script - Juan Antonio Villalpando
-- Tutorial de iniciación a Visual Basic Script --
Volver al índice del tutorial
___________________________
5.- Fechas.
- Baja a tu ordenador estos archivos y ejecútalos:
13Dias.vbs
13Dias.vbs |
Fe = InputBox ("Introduzca su fecha de nacimiento en este formato dd/mm/aa Ejemplo: 12/9/83",,"12/9/83")
x=Datediff("d",Fe,Now)
a=MsgBox("Has vivido " &x &" días. Enhorabuena.",,"Días vividos") |
14Hora.vbs
14Hora.vbs |
fh=Now
x = MsgBox(fh,,"Fecha y hora")
h=Hour(fh)
y = MsgBox("Son las " & h & " horas",,"Hora actual")
' Ver hora, minuto, segundo, Time
' Ejercicio: Realiza un programa en el salga el día que es de la semana
' o sea, Lunes, Martes, Miércoles .... utilizar Weekday y la instruccióo IF |
15Semana.vbs
15Semana.vbs |
h=Now
d=Weekday(h)
Select Case d
Case 1
dia="¡¡¡ DOMINGO !!!"
Case 2
dia="el maldito lunes."
Case 3
dia="martes tonto."
Case 4
dia="el mediano miércoles."
Case 5
dia="un maravilloso jueves."
Case 6
dia="por fin es viernes."
Case 7
dia="amable sábado."
End Select x=MsgBox("Hoy es: " &dia,,"Día de la semana") ' Ver Weekday |
_____________________
|
|