O ListView Visual BASIC é um controle que exibe os dados em forma de lista. O ListView pode exibir informações como uma lista de ícones pequenos ou grandes , um pequeno ícone com o texto à direita do mesmo, ou um formato de relatório em que o texto de cada " subitem " é exibido à direita em cada cabeçalho de coluna . Estes pontos de vista pode soar familiar para você como este é como o Windows Explorer exibe pasta e informações do arquivo. As informações exibidas na ListView pode ser visualizado, selecionado, reordenados , atualizado ou exportado para outro aplicativo, como o Bloco de Notas ou Excel. Instruções
1

Abra um novo projeto Visual Basic Standard EXE. Adicione o objeto ListView à caixa de ferramentas , clicando em " projeto ", "Componentes" e clicando na caixa de seleção ao lado de " Microsoft Windows Common Controls 6.0 ( SP6) . " Selecione o objeto ListView na caixa de ferramentas e clique no default " Form1. " Renomear " Form1 " para algo mais significativo , como " frmMain " eo ListView recém-criado para " lvCustomer ".
2

Adicionar um botão para " frmMain " e definir a legenda para" Exportar ". no" Form_Load " do evento, preencher " lvCustomer " com os dados do cliente , quer por hard- codificação ou recuperar os dados de um banco de dados. Adicione os cabeçalhos das colunas da mesma maneira. Um exemplo de base de adição de um cabeçalho da coluna é " lvCustomer.ColumnHeaders.Add 1 , " CustName " , " Nome " . " Esta linha de código indica que o primeiro cabeçalho de coluna terá uma chave de " CustName " e um valor exibido para o usuário de "Nome ". um exemplo básico de adicionar uma linha de dados para o " lvCustomer " é " lvCustomer.ListItems.Add 1 ," John Smith " . " Essa linha de código cria uma linha de dados na primeira coluna , sem chave e um valor de " John Smith ".
3

Recupere os cabeçalhos de coluna por looping através dos itens ListView ColumnHeader . para i = 1 To lvCustomer.ColumnHeaders.CountsHeader = sHeader + lvCustomer.ColumnHeaders.Item (i). Texto + vbTabNextThis código percorre cada ColumnHeader e armazena o valor na variável string " sHeader ", seguido de um caractere de espaço de tabulação.

4

Criar um arquivo de texto para armazenar os dados ColumnHeader com a Microsoft FileSystemObject . O código a seguir cria um arquivo de texto chamado " output.txt " e salva o valor da variável string " sHeader " para esse arquivo : Dim FSO As New FileSystemObjectSet NewFile = FSO.CreateTextFile ("c: \\ temp \\ saída. txt ", True , False) newFIle.Write ( sHeader )
5

Abra o conteúdo do novo " " arquivo no bloco de notas com o" resultado.txt comando Shell " : dblNotePadID = Shell ( "Bloco de notas c: \\ temp \\ output.txt " )