grassettop in una colonna di un ltw

[ladyBlu]

dai un'occhiata a questo codice che rende Item e SubItem grassetti:

lvElenco = è la listview

Dim i As Integer
Dim lvItem As ListItem
Dim lvSItem As ListSubItem

lvElenco.ListItems.Clear
lvElenco.ColumnHeaders.Clear
lvElenco.ColumnHeaders.Add Text:="Nome", _
                           Width:=(lvElenco.Width / 2) - 200
lvElenco.ColumnHeaders.Add Text:="Cognome", _
                           Width:=(lvElenco.Width / 2) - 200
lvElenco.View = lvwReport

For i = 1 To 10
    Set lvItem = lvElenco.ListItems.Add(Text:="Ciao " & i)
    lvItem.Bold = True
    Set lvSItem = lvItem.ListSubItems.Add(Text:="ciao " & i)
    lvSItem.Bold = True
Next i