Visual Basic - Codigo

Necesito el codigo de un programa que:
apretando un boton te salga en una label la cuenta atrás desde 10,
y apretando otro se detenga la cuenta atras

Private sub command1_click (index as integer)

Select case index
Case 0
for i=10 to 0 step -1
Label1.caption=i
doevents
' aqui en lugar de usar doevents puedes usar la funcion Sleep(Tiempo).
'recuerda que debes declarar esta funcion.
next i
case 1
exit sub
end select
end sub

Como te habras dado cuenta deberas crear la matriz de controles command1 con indices 0 y 1

Ojala te sirva, es con gusto

Si no quieres usar el control TIMER, esta puede ser una solución.

En un proyecto nuevo pon dos labels (Label1 y Label2) y dos botones de comando (Command1 y Command2), y después copia y pega esto en sus correspondientes procedimientos de evento:

Private Sub Command1_Click()
Dim Tiempo As Long
Label1 = 10
Label2 = "Inicio"
Tiempo = Second(Now)
Do While Label2 = "Inicio"
Label1 = 10 - Abs((Second(Now) - Tiempo) Mod 10)
DoEvents
Loop
End Sub

Private Sub Command2_Click()
Label2 = "Fin"
End Sub

Saludos
Josetxu

hola que tal?
la verdad launica solucion que se me ocurre es la de usar el timer
en ese caso debes poner la propiedad interval del timer en 1000
luego le haces doble click al timer y pones

if z=0 then
label1.caption=10
z=1
else
if val(label1.caption)>-1
label1.caption= val(label1.caption)-1
end if
end if

esto es lo que se me ocurre cualquier cosa escribime y vemos si lo solucionamos
suerte