Boton play y pausa para Slider

[andrer03]

Hola a todos

Hola queria saber si me pueden ayudar como hacen un boton de play y pause para usarlo con un slider es decir cuando le de a play los numeros del value del slider pasen rapido y cuando le de a pause se pare la reproduccion de los numeros del value y que se note en la barra de progresos del slider cuando se para y se reproducen.

Bueno no se si me explique bien

Se un poco como funciona los slider pero no se si tengo que ayudarme para ahcer esto con un timer o algo

espero que me ayuden gracias.

[TGa.]

Bueno como estoy aburrido hice el code, pero si no entiendes pregunta, es un code sencillo igual, sacate todas las dudas sino no sirve que posteen el code

Código (vb) [Seleccionar] Expandir

Option Explicit

Private Sub Command1_Click()
    Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
    Timer1.Enabled = False
End Sub

Private Sub Form_Load()
    Command1.Caption = "Play"
    Command2.Caption = "Pause"
   
    Slider1.Min = 0
    Slider1.Max = 50
   
    Timer1.Interval = 100
    Timer1.Enabled = False
End Sub

Private Sub Timer1_Timer()
    With Slider1
        If .Value = .Max Then
            Timer1.Enabled = False
        Else
            .Value = .Value + 1
        End If
    End With
End Sub

Creo que esto es lo que estas buscando

[andrer03]

gracias amigo
esto estaba buscando lo que pasa es que queria que un solo boton haga de paly y pausa pero bueno eso sera mas facil creo tendre que añadir alguna condicion o algo

gracias