sábado, 8 de septiembre de 2007

APUNTES CLASE 6/7

Sub Uno_Click
Auxcanal.Caption = Auxcanal.Caption + "1"
End Sub
Sub Enter_Click
Canal.Caption = Auxcanal.CaptionAuxcanal.Caption =
" "End Sub
Sub Canalmas_Click
Canal.Caption = Val (Canal.Caption) + 1
End Sub

No hay comentarios: