1 2 3 4 5 6 7 8 9 10 11 12 13
| Private Sub ListView1_DrawSubItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawListViewSubItemEventArgs) Handles ListView1.DrawSubItem
If e.Item.SubItems(2) Is e.SubItem Then
e.DrawDefault = False
e.DrawBackground()
e.Graphics.DrawImage(My.Resources.image1,
e.SubItem.Bounds.Location)
e.Graphics.DrawString(e.SubItem.Text, e.SubItem.Font, New SolidBrush(e.SubItem.ForeColor), e.SubItem.Bounds.Location.X + My.Resources.image1.Width, e.SubItem.Bounds.Location.Y)
Else
e.DrawDefault = True
End If |
Partager