محمد الخطيب

Private Sub Timer1_Timer() Label1.Caption = Val(Label1.Caption) + 1 If Label1.Caption = "60" Then Label2.Caption = Val(Label2.Caption) + 1 Label1.Caption = "0" Timer1.Enabled = True End If If Label2.Caption = "60" Then Label3.Caption = Val(Label3.Caption) + 1 …