Postada em 23/08/2006 17:03 hs
- Coloque um ListView no seu form com o nome de ListView1
- Cole o seguinte código no evento load do seu form:
ListView1.View = 3 'Para visualizar o listview em modo Report(como um grid)
'Adicionando Cabeçalhos
ListView1.ColumnHeaders.Add , , "Nome"
ListView1.ColumnHeaders.Add , , "Telefone"
ListView1.ColumnHeaders.Add , , "Endereço"
'Adicionando ítens
ListView1.ListItems.Add , , "João"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "555-3333"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "Rua das Camélias, 45"
ListView1.ListItems.Add , , "Maria"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "666-9999"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "Rua Sem saída, 99"
ListView1.ListItems.Add , , "José"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "558-9844"
ListView1.ListItems(ListView1.ListItems.Count).ListSubItems.Add , , "Av. das Alamedas, 158"
|
