Jump to content
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

startuga

Passar valores da base de dados para Listview

Recommended Posts

startuga

Boas pessoal,

Tenho este form [ver link da imagem em baixo]

http://imgur.com/U6jpq5O

Estou a tentar carregar os valores da base de dados associados a cada botão , para ir preenchendo a listview a medida que vou carregando nos botões.

Contudo não sei se utilizar a listview será o método mais correcto.

Depois não estou a conseguir passar os valores de cada botão para a listview.

Agradecia a vossa ajuda,

Obrigado.

Share this post


Link to post
Share on other sites
vikcch

Tendo em conta que tens os dados numa DataTable:

ListView1.Clear()
ListView1.View = View.Details
ListView1.GridLines = True
ListView1.FullRowSelect = True

'Adiciona colunas
For Each col As DataColumn In dataTable.Columns
ListView1.Columns.Add(col.ColumnName)
Next

'Adiciona linhas
For Each row As DataRow In dataTable.Rows

'Cria um array de strings a partir do "row.ItemArray"
Dim arrStr(row.ItemArray.Length) As String
For i As Integer = 0 To row.ItemArray.Length - 1
	arrStr(i) = row.ItemArray(i).ToString
Next

'ListViewItem é como se fosse uma linha dessa listview, está a receber um array de strings
Dim lvi As ListViewItem = New ListViewItem(arrStr)
ListView1.Items.Add(lvi)
Next

Seria mais facil usares uma datagridview em vez da listview...

com a datagridview:

DataGridView1.DataSource = dataTable

Edited by vikcch

Share this post


Link to post
Share on other sites
FDomingos

Podes adicionar valores à ListView desta forma:

Dim item As New ListViewItem(New String() {"produto1", "preco1"})
Dim item2 As New ListViewItem(New String() {"produto2", "preco2"} )
ListView1.Items.Add(item)
ListView1.Items.Add(item2)

Share this post


Link to post
Share on other sites
Miguel Filipe

Tendo em conta que tens os dados numa DataTable:

ListView1.Clear()
ListView1.View = View.Details
ListView1.GridLines = True
ListView1.FullRowSelect = True

'Adiciona colunas
For Each col As DataColumn In dataTable.Columns
ListView1.Columns.Add(col.ColumnName)
Next

'Adiciona linhas
For Each row As DataRow In dataTable.Rows

'Cria um array de strings a partir do "row.ItemArray"
Dim arrStr(row.ItemArray.Length) As String
For i As Integer = 0 To row.ItemArray.Length - 1
	arrStr(i) = row.ItemArray(i).ToString
Next

'ListViewItem é como se fosse uma linha dessa listview, está a receber um array de strings
Dim lvi As ListViewItem = New ListViewItem(arrStr)
ListView1.Items.Add(lvi)
Next

Seria mais facil usares uma datagridview em vez da listview...

com a datagridview:

DataGridView1.DataSource = dataTable

Todos os valores correspondentes aos botões estão em BD access.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.