Tareas

Tareas 3/7 - a. Realizar la recopilación de noticias de la semana. b. Tarea para realizar durante la clase del 3/7. Incluyendo 4 objetos (uno de ellos una imagen importada), realizar una animación en Flash de 20 segundos (circular) que incluya: 1. Una deformación 2. Desaparición y reaparición 3. Cambios de colores La imagen importada debe ser un logo conocido (de un equipo, un canal, una marca, etc.) y las animaciones deben resaltar el logo. Publicar el swf en los dos blogs, y en el campus (en la tarea destinada al respecto). Se puede trabajar de a dos, pero la publicación es individual, como siempre. Título: Animación, logo Tags: animación, logo, nombre Fecha de destacado: hasta el 30-7 (Para el campus) Guille

Wednesday, November 07, 2007

Apunte de la clase del 1 de noviembre

Private Sub cuatro_Click()
If contraseña.Text = "chinito" Then
ascensor.Top = 856
contador4.Caption = Val(contador4.Caption) + 1
Else
contador4.Caption = Val(contador4.Caption) + 0
End If
If contraseña.Visible = False Then
contraseña.Visible = True
Else
contraseña.Visible = False
End If
If ok.Visible = False Then
ok.Visible = True
Else
ok.Visible = False
End If
End SubPrivate Sub cuatrodos_Click()
If contraseña.Text = "chinito"
Then
ascensor.Top = 856
contador4.Caption = Val(contador4.Caption) + 1
Else
contador4.Caption = Val(contador4.Caption) + 0
End If
If contraseña.Visible = False Then
contraseña.Visible = True
Else
contraseña.Visible = False
End If
If ok.Visible = False Then
ok.Visible = True
Else
ok.Visible = False
End If
End Sub
Private Sub luz_Click()
If ascensor.BackColor = vbBlack Then
ascensor.BackColor = vbYellow
Else
ascensor.BackColor = vbBlack
End If
End Sub

No comments: