ADICIONAR ITENS DENTRO DE UM DATAGRID VB.NET,ACCES

GLEDSON26 03/08/2015 13:12:25
#449495
BOm galera estou com a seguinte duvida!
Gostaria de saber como que faço para adicionar os itens dentro de um DAtagrid atraves de uma consulta com o Banco de dados Access.
por exemplo:
com um btn consultar, (faço a consulta com o bando de dados, seleciono o produto e automaticamente apos selecionar o produto cair dentro do Datagrid)
com isso vou adicionando os produtos no form de venda..

Por favor Galera me ajude nesses requisitos.
minha maior duvida é no Datagrid. fazer a consulta, selecionar o produto e cair dentro do Datagrid no form de Venda..

Agradeço desde de já pela atenção e a colaboração de todos.
TUNUSAT 03/08/2015 13:27:48
#449496
GLEDSONGABY,

Por favor, veja estes links:

===============================================================================
VB .NET - Manipulando o DataGridView
http://www.macoratti.net/07/06/vbn5_mdg.htm
===============================================================================
Como Salvar itens da Datagridview dentro de uma coluna?
http://pt.stackoverflow.com/questions/70098/como-salvar-itens-da-datagridview-dentro-de-uma-coluna
===============================================================================
VB .NET - Localizando e exibindo dados em um DataGridView (para novatos)
http://www.macoratti.net/13/08/vbn_led1.htm
===============================================================================

[][ô]s,
Tunusat.
NICKOSOFT 03/08/2015 13:28:26
#449497 Resposta escolhida
pelo q entendi, vc quer adicionar manualmente e não direto do BD, é isso?
se for isso, declare um datatable no form
      Dim dtPagamentos As New DataTable()
    Dim drPag As DataRow

no load modele seu datatable
  
        dtPagamentos.Columns.Add([Ô]Referencia[Ô])
        dtPagamentos.Columns.Add([Ô]ReferenciaID[Ô])
        dtPagamentos.Columns.Add([Ô]Valor[Ô])
        dtPagamentos.Columns.Add([Ô]ValorPago[Ô])
        dtPagamentos.Columns.Add([Ô]Vencimento[Ô])
        dtPagamentos.Columns.Add([Ô]DataPagamento[Ô])
        dtPagamentos.Columns.Add([Ô]Transacao[Ô])
        dtPagamentos.Columns.Add([Ô]TransacaoID[Ô])
        dtPagamentos.Columns.Add([Ô]Forma[Ô])
        dtPagamentos.Columns.Add([Ô]FormaID[Ô])
        dtPagamentos.Columns.Add([Ô]ID[Ô])
        dtPagamentos.Columns.Add([Ô]Cheque[Ô])

no botão vc preenche o datatable
  
        drPag = dtPagamentos.NewRow()
             drPag.Item([Ô]referencia[Ô]) = cmbReferente.Text
            drPag.Item([Ô]referenciaid[Ô]) = cmbReferente.SelectedValue
            drPag.Item([Ô]valor[Ô]) = CDbl(txtValorIntegral.Text)
            drPag.Item([Ô]valorpago[Ô]) = CDbl(txtValorPago.Text)
            drPag.Item([Ô]vencimento[Ô]) = ds.Tables(0).Rows(0).Item([Ô]vencimento[Ô]).ToString
            drPag.Item([Ô]datapagamento[Ô]) = dtpPagamento.Text
            drPag.Item([Ô]transacao[Ô]) = cmbTransacao.Text
            drPag.Item([Ô]transacaoid[Ô]) = cmbTransacao.SelectedValue
            drPag.Item([Ô]forma[Ô]) = cmbForma.Text
            drPag.Item([Ô]formaid[Ô]) = cmbForma.SelectedValue
            drPag.Item([Ô]id[Ô]) = ds.Tables(0).Rows(0).Item([Ô]id[Ô]).ToString
            drPag.Item([Ô]cheque[Ô]) = txtCheque.Text
            dtPagamentos.Rows.Add(drPag)
[ô]mostrar no datagridview
        dgvPagamentos.DataSource = dtPagamentos
Tópico encerrado , respostas não são mais permitidas
Voltar