Apunte (Por Mica D)

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