On 14.49 by Anonim in ,
Dim MyIndex As Integer, VArr As Variant, VBarr As VariantPrivate Sub CmdUpDown_Click(Index As Integer) Dim n n = Val(texts.Text) If MyIndex = 3 Then  If Index = 1 And n < 999 Then   texts.Text = n + 1  End If Else  If Index = 1 And n < 59 Then   texts.Text = n + 1  End If End If If Index = 0 And n > 0 Then  texts.Text...