Discussion :

[Miska59]

Bonjour,

je voudrais afficher progressbar dans listview1 mais mon souci j'arrive afficher sur les 5 listviewsubitems.



mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Public Class Form1
    Dim pb As New ProgressBar
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        For i = 0 To 5
            Dim lvi As New ListViewItem(i)
            lvi.SubItems.Add("")
            ListView1.Items.Add(lvi)
            ListView1.Controls.Add(Listview_Progressbar(ListView1, 1))
        Next
    End Sub
 
    Private Function Listview_Progressbar(lvl As ListView, Index As Integer) As ProgressBar
        pb.Minimum = 0
        pb.Maximum = 100
        pb.Value = 50
        pb.Parent = lvl
        Dim rt As New Rectangle
        rt = lvl.Items(lvl.Items.Count - 1).SubItems(Index).Bounds
        pb.SetBounds(rt.X, rt.Y, rt.Width, rt.Height)
        Return pb
    End Function
End Class

Pouvez-vous me dire comment afficher sur les 5 listviewsubitem? merci d'avance