Usuário com melhor resposta
Percorrer Datagridview

Pergunta
-
Pessoal, alguém poderia dar alguma ajuda com o código abaixo. Estou percorrendo um datagridview e verificando uma condição, para então adicionar outros datasgrids, mas só consigo criar um...
Public i As Integer = 1 Public j As Integer = 0 Private WithEvents meuDataGridView As New DataGridView Private Sub btnbuscar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbuscar.Click For Each linha As DataGridViewRow In dgItensPesquisado.Rows For Each celula As DataGridViewCell In dgItensPesquisado.Rows(linha.Index).Cells If celula.ColumnIndex = 0 Then i = celula.Value End If If i = 0 Then DataGridView()
Exit Sub End If Next j = i Next End Sub Private Sub DataGridView() For contador = 0 To j Me.Controls.Add(meuDataGridView) Next End Sub
goku
- Editado songoku99 sábado, 16 de março de 2013 20:35
- Dividir Levi DomingosModerator domingo, 17 de março de 2013 12:29
Respostas
-
amigo tente adicionar a linha antes de :
meuDataGridView = new DataGridview()
Me.Controls.Add( meuDataGridView )
ficando assim, vc precisa instanciar um novo DataGridView na memória para haver a diferença..
tenta ai e me fala.. abraços !
Att, Afonso Fernandes.
- Marcado como Resposta songoku99 terça-feira, 19 de março de 2013 02:34
Todas as Respostas
-
Olá pessoal,
Eu alterei o código, e são geradas os datagridviews, porém só é fixado no formulário o último. Veja que estou querendo gerar vários datas/tabelas, alguma dica para "salva-los" no formulário.
Private Sub DataGridView()
dgItensPesquisado.Visible = False
dgListaTabela1.Visible = False
Dim contador As Integer = 0
Dim x As Integer = 0
Dim y As Integer = 0
For contador = 0 To j
Me.Controls.Add(meuDataGridView)
meuDataGridView.Name = "meuDataGridView " & contador & ""
meuDataGridView.Location = New Point(8 + CInt(x), 8)
meuDataGridView.Size = New Size(250, 150)
meuDataGridView.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.DisplayedCellsExceptHeaders
meuDataGridView.ColumnHeadersBorderStyle = DataGridViewHeaderBorderStyle.Single
meuDataGridView.CellBorderStyle = DataGridViewCellBorderStyle.Single
meuDataGridView.GridColor = Color.Black
meuDataGridView.RowHeadersVisible = False
meuDataGridView.Anchor = AnchorStyles.Left
x = x + 260
Next
Obrigado!
goku
-
amigo tente adicionar a linha antes de :
meuDataGridView = new DataGridview()
Me.Controls.Add( meuDataGridView )
ficando assim, vc precisa instanciar um novo DataGridView na memória para haver a diferença..
tenta ai e me fala.. abraços !
Att, Afonso Fernandes.
- Marcado como Resposta songoku99 terça-feira, 19 de março de 2013 02:34
-