Mostrando entradas con la etiqueta 23/8. Mostrar todas las entradas
Mostrando entradas con la etiqueta 23/8. Mostrar todas las entradas

jueves, 30 de agosto de 2007

Avance del 23 de agosto,poe Ezequiel

En esta clase lo que hicimos en le trabajo fue:
-Programar de vuelta el enter ya que habiamos hecho algo mal
-Programar el anterior
-Crear el canalanterior

Apunte de la clase del 23 de agosto

Lo que hicimos la clase del 23 fue programar el anterior y el enter .este ult. de vuelta ya que habiamos hecho algo mal.

Private Sub anterior_Click()
auxcanal.Caption = canalant.Caption
canalant.Caption = numerodecanal.Caption
numerodecanal.Caption = auxcanal.Caption
auxcanal.Caption = ""

Private Sub enter_Click()
If tvcatv.Caption = "tv" Then
If auxcanal.Caption < 13 Then
canalant.Caption = numerodecanal.Caption
numerodecanal.Caption = auxcanal.Caption
auxcanal.Caption = ""
Else
auxcanal.Caption = ""

End If
Else
If auxcanal.Caption < 120 Then
canalant.Caption = numerodecanal.Caption
numerodecanal.Caption = auxcanal.Caption
auxcanal.Caption = ""
Else
auxcanal.Caption = ""
End If
End If

End Sub