s'aligner sur la barre du progressbar

Version imprimable

bonjour ,
étant débutant j'aimerai savoir comment faire pour aligner un bouton( qui est reduit a la largeur de la progressbar) sur la barre de la progressbar?
j'ai essayé ce qui suit mais cela ne fonctionne pas,le label se deplace a partir du bord de la form est non a partir de sa position

Code:

label1.Location = New Point(400, 276)
Code:

1 2 3 4 Private Sub progressbar_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) AxWindowsMediaPlayer1.Ctlcontrols.currentPosition = Me.ProgressBar1.Value label1.left = Me.AxWindowsMediaPlayer1.Ctlcontrols.currentPosition End Sub
merci pour votre aide

26/05/2013, 18h33
hacker59

bonjour,
donne nous plus explication pars que là,on ne comprend pas ce que tu veut dire.
26/05/2013, 18h37
choupinou22

en fait j'ai une progressbar et dessus j'ai mis un label.
ce que j'aimerai c'est lors de ma lecture mon label avance en même temps que mon progressbar.
pour le moment tout ce que j'obtient c'est que lors de la lecture mon label se positionne automatiquement au bord du formulaire et se deplace au même rythme que mon progressbar.ce que j'aimerai c'est la même chose mais a l'endroit ou se situe la barre de ma progressbar
26/05/2013, 19h03
hacker59

1 pièce(s) jointe(s)
bonjour, si j'ai bien compris ton label te donne % par rapport a ton progressbar
les codes:
Code:

1 2 ProgressBar1.Increment(1) Label1.Text = ProgressBar1.Value.ToString + "%"
voici en image dans pièce joints:
26/05/2013, 19h05
choupinou22

en fait mon label sert de curseur,j'aurrai pu mettre egalement a la place un bouton que j' aurrai réduit a la largeur du progressbar
26/05/2013, 19h55
hacker59

pourrais-tu me donner en image ton projet, pour mieux comprendre ton probleme.
26/05/2013, 20h04
choupinou22

2 pièce(s) jointe(s)

voici 2 images dont le curseur se trouve completement a gauche

1 pièce(s) jointe(s)

OK,voici la solution a ton probleme.
mes codes:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Try
            OpenFileDialog1.ShowDialog()
            AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
            AxWindowsMediaPlayer1.Ctlcontrols.stop()
           OpenFileDialog1.Filter = "Supported Media (avi, mid, mp3, mpg, mpeg, mp4, wav, wma, wmv)|*.avi;*.mid;*.mp3; *.mpg; *.mpeg;*.mp4;*.wav;*.wma;*.wmv|Audio Media (*.mid, *.mp3, *.wav, *.wma|*.mid;*.mp3;*.wav;*.wma|Video Media (*.avi, *.mpg, *.mpeg, *.wmv)|*.avi;*.mpg;*.mpeg;*.wmv"
        Catch ex As Exception
            MessageBox.Show("Une erreur se produit ne peut pas lire le fichier", "Erreur", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub
 
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        AxWindowsMediaPlayer1.Ctlcontrols.play()
        Timer1.Start()
    End Sub
 
    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        Label1.Text = AxWindowsMediaPlayer1.Ctlcontrols.currentPositionString
        Label2.Text = AxWindowsMediaPlayer1.currentMedia.durationString
        ProgressBar1.Value = AxWindowsMediaPlayer1.Ctlcontrols.currentPosition
        HScrollBar1.Value = ProgressBar1.Value
    End Sub
 
    Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
        AxWindowsMediaPlayer1.Ctlcontrols.stop()
        Timer1.Stop()
    End Sub

voici en image:

26/05/2013, 21h59
choupinou22

Merci,petite question est ce que dans le hsscroll on ne peut pas avoir derrière de curseur une couleur ce qui m éviterai de surcharger l interface avec en plus le progressbar?