Apuntes de VB

Sub Uno_ClickAuxcanal.Caption = Auxcanal.Caption + "1"End SubSub Enter_ClickCanal.Caption = Auxcanal.CaptionAuxcanal.Caption = " "End SubSub Canalmas_ClickCanal.Caption = Val (Canal.Caption) + 1End Sub