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.
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
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
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 :)